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Abstract 


Peon eee SOAP TER GRAPHEES INPLEMENTAT ION’ OF 
Tite Pe Not Nae SSSPEINE SURFACE SENERATION 


By Dennis Michael Bryant 
Chairperson of the Supervisory Committee: 
Professor DO. E. Calkins 
Department of Mechanical Engineering 


Dieeeitfieckilty of accurately defining, representing 


and visualizing three-dimensional sculptured surfaces’ has 


concerned designers and engineers throughout history, But 
never more so than today. Technology has given man the 
ability, and the necessity, to build automobile bodies, 


ship hulls and aircraft fuselages with complex curvature 
and extremely smooth lines. The ability to efficiently 
develop and define the form of such Surfaces has not kept 
Pace with the requirement to manufacture them. 

This study explores the application of a surface 8B- 
spline for surface definition coupled with high-level 
computer graphics to enhance visualization. A computer 
program, SreiNeE.. is introduced which Facilitates 
interactive construction of the B-spline control graph and 
real-time manipulation of the model on an Evans’ and 
Sutherland PS 300 distributed graphics system. A uniform 
"oOmmaelonal sSUGhrace B-Spoline iS utilized For interactive 
modeling, with the Capability preprogrammed Gis 


implementing nonuniform rational surface B-splines upon 





later addition of an inversion algorithm. 
Ui ene worOouram 2S not Fully Functional, due toa 
apparent shortcomings of the host computer operating 


system, the viability and desirability of such a system is 


Fully demonstrated. Heuristic techniques are discussed 
For approaching model development, based on properties of 
the B-spline and characteristics of SPLINE. Step-by-step 


illustrated case studies Further develop the modeling 
techniques. Examples include the generation of B-spline 
representations of a sailing yacht hull and of a Porsche 
automobile body, as well as the Freeform development of a 
sculptured surface ab initio. 

Structured and heavily commented program listings are 
included, with Flow diagrams, Function networks, and 
Operating instructions. Program expansions and hardware 
improvements are recommended and existing provisions 


within the program for these improvements are identified. 
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CHAPTER 1 


SCULPIURED SURFACE REPRESENTATION 


sl euelx ¢ ulptured Surfaces 
The computer program described herein was developed 


to demonstrate the Feasibility of designing and defining 


sculptured surfaces through the use of a B-spline 
algorithm coupled with highly interactive computer 
graphics. The accurate definition, representation, and 


visualization of three-dimensional surfaces is a problem 
which has concerned designers and engineers throughout 
i SEOEU: Even relatively simple three-dimensional shapes 
can often be difficult to depict on a two-dimensional 
drawing such that the viewer can readily generate a mental 
image of the object or the craftsman can construct the 


object true to the designer’s intentions. 


Particularly troublesome, however, are sculptured 
surfaces, those having curvature in more than one 
direction. Sculptured surfaces forma vital part of 


aircraft, ship, and automobile designs, being necessary in 
aircraft and ship design for aerodynamic and hydrodynamic 
streamlining and used extensively in automobile design 
primarily for styling reasons. Nor is the use of these 
troublesome surfaces for the sake of appealing to the eye 
restricted to such major market items as automobiles; as 


Rogers and Satterfield C1J point out, today even the 





e 
shampoo bottle is likely to sport a complex sculptured 
surface. 

Given the difficulty of representing these surfaces 
in a two-dimensional medium, it is not surprising that the 
Historical solution has often been simply to avoid 
producing such drawings at all. Letcher Cej presents a 
brief but interesting history of man’s attempts to skirt 
the problem in the context of ship hull design. The form 
of the earliest hulls, and of many small craft in Ilow- 
technology cultures today, was undoubtedly preserved by 
Carving a solid model from wood. Later, the use of the 
master-section-and-batten method was developed and =/)has 
continued to some extent until today. A few transverse 
sections are erected with the desired form, and the 
remainder of the hull is defined by the installation of 
the hull planking as it is sprung about the master 
sections. 

Even as late as the early 1900’s, the lines drawing 


was not the principal tool in developing and visualizing 


the lines of a ship’s hRAull. While the lines were 
Ultimately preserved with such a drawing, they were 
usually taken from a carved model. Often the model was 


even carved ina material with separable layers so that 
the lines could be directly traced onto the paper. 


1.c. The Ship’s Lines Drawing 


The problem of defining and representing a sculptured 





3 
Surface is perhaps best illustrated by a description of 
the lines drawing, that instrument which is used to 
develop and define the surface of ship and boat hulls. As 
is standard with the representation of virtually all 
three-dimensional objects, three views of the hull are 
presented on the lines drawing: a top view Cknown as the 
half-breadth plan, because only one half of the 
Symmetrical hull is shown); a Front view Cknown as the 
body plan, and which actually is a stern view as well), 
and a side or profile view Clabeled the sheer plan). 
Intersections of the vessel’s Hull with evenly spaced 
cutting planes are projected onto these three reference 
planes. On thee body plam, the form of the hull at 
transverse sections is shown. Depending on the size _ and 


complexity of the vessel’s hull, the sections are shown at 


ten, twenty or forty Foot intervals, with a Few 
intermediate stations shown in areas of greatest 
Curvature. For the sheer plan, vertical cutting planes 


are taken at one to four foot intervals, yielding a set of 
buttocks lines. Waterlines are similarly generated on the 
half-breadth plan by intersecting the hull with vertical 
longitudinal cutting planes. Nonorthogonal cutting planes 
Further serve to define the shape through the production 
oF diagonals or cant lines. A sample lines drawing 1S 
shown in figure 1. 


The task of the naval architect in developing a 
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5 
completed set of lines is not an easy one. Having 
visualized the desired form, the architect must accurately 
translate it into a set of lines on paper which satisfies 


Quantitative, qualitative, and aesthetic considerations. 


Working with irregularly shaped curves, the designer must 
nevertheless maintain specific areas within the curves’ to 
yield proper ship stability and handling characteristics. 
In order to obtain Fair Csmooth) lines, the lines are 
drawn with a drafting spline, an elastic lath constrained 
by weights called ducks. The lines must not only be 
smooth and contain the appropriate areas, Dut the 
projection oF all points on the lines onto all three 
reference planes must be consistent. These requirements 
often appear to be nearly mutually exclusive. 

In short, because of the difficulties of ¢€1) visual- 
izing the sculptured surfaces, €2) obtaining smooth lines, 
C3) maintaining agreement of all views, and C4) achieving 
and measuring the required form characteristics such as 
section areas, the design of a ship’s lines is a tedious 
and difficult iterative task for even the most expsrienced 
architect. Letcher C2] cites Kinney as saying, ”’It takes 
between Five and ten working days For an experienced man 
to produce a good set of lines,’ regardless of the size of 
the vessel.” He also points out that anything more than a 
Slight change requires starting over almost from the 


beginning. 
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When the naval architect has Finished the lines 
drawing, however, the task of hull definition is not yet 
complete. The lines are next translated into a tabulated 
Form called a table of offsets. This table lists the 
distances, at each station, OF waterlines from the 
centerline and of buttocks lines above the baseline. An 
example is shown in table l. 

Peeseee accuracy is needed for production purposes 
than is obtainable from the relatively small scale lines 
drawings. For this reason the lines are redrawn full size 
on a large wooden Floor Cthe mold loft) and fFaired again. 
In very recent practice, the full scale lofting may be 
replaced by drawing the lines in one-sixteenth scale on a 
marble slab with a very hard pencil or by entering the 
offsets into a computer for generation of a large scale 
drawing on a plotter. In any case, the large scale 
Fairing is used to identify necessary revisions to the 
lines and to produce a more accurate table of offsets. 
1.3. Mathematically Defined Surfaces 

It is not hard to understand, then, the benefits 
which would be derived ne the hull form, "ee shampoo 
bottle, could be defined by a precise mathematical 
relationship. The need for full scale lofting would be 
eliminated, since accuracy could be obtained initially to 
whatever degree was desired. Precision would ne longer 


depend upon the ability to measure small increments on a 
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8 
drawing, but could be achieved by simply outputting a few 
more digits from the computer’s memory. 

Preparation of a table of offsets would not be a 
manual task, but simply a matter of solving the 
mathematical relationship at any desired point on the 
surface. Thus the representation would not only be more 
accurate, but could be more complete as well. A lines 
drawing only accurately defines the surface at points 
which fall exactly on the lines drawn. Determination of 
intermediate points requires drawing and Fairing 
additional lines or performing some manner of 
interpolation. Interpolation will yield only a rough 
approximation, given the complex curvature of the form. A 
mathematical representation can be equally accurate at any 
point which is defined by the mathematical relationship. 

A mathematical representation could also provide 
direct input for the calculation of stability data, as 
well as for fabrication. The need for scale model testing 
would be greatly reduced with the substitution of computer 
Simulations, which would no longer need to rely upon mere 
approximations of the form. 

Perhaps most exciting are the prospects for using a 
mathematical representation of a sculptured surface as 
input to a numerically controlled machining CNCM) process. 
Rogers, Rodriguez, and Satterfield have already reported 


substantial progress in this application (C4,5,6]. = 
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system of computer programs’ was developed on a 
microprocessor-based graphics system interfaced with a CNC 
controller to drive a milling machine for the production 
oF wooden towing tank models. The numerical control 
milling data base is actually generated directly by a 
computer program from a mathematical definition of the 
hull. This mathematical definition is created by the 
program in response to manipulation of a graphical image 
on the computer screen by the user. Using this system, 
towing tank models have been produced in only two days. 

Considering the beleaguered state of the shipbuilding 
and automotive industries in the United States today, it 
is impossible not to become excited with the possibilities 
of larger scale implementations of this concept. 
1.4. High-Level Computer Graphics 

The implementation of mathematical definition of 
sculptured surfaces does not require enormous computing 
power. The FAIRLINE series of computer programs developed 
by Letcher C2,7,8] for the design of sailing yacht hulls 
was designed for use on a Texas Instruments’ pocket 
calculator. On the other hand, defining the surface is 
only part of the problem. Closely related is the problem 
of representing the surface during the surface development 
process and subsequent to surface definition. It may be 
difficult to visualize a three-dimensional surface while 


looking at a two-dimensional drawing, but it is even more 





10 
difficult to visualize a complex sculptured surface by 
reviewing a computer-generated table of coordinates. 

It is when coupled with high-level computer graphics 
that the mathematical representation begins to be as 
useful as it is powerful. High-level computer graphics 
have been defined by Calkins (93 as being characterized 
By: 

C1) the ability to display three-dimensional 
objects, 
C2) real-time image manipulation of the three- 
dimensional objects displayed, and 
C3) color-shaded object surfaces. 
Calkins Summarizes high-level computer graphics as the 
"capability of real time manipulation of realistically 
rendered 3-dimensional objects.” CIt will be shown later 
that while the computer system utilized for the research 
described in this paper does not meet the third criterion, 
it certainly fulfills the intention of this summation.) 
With high-level computer graphics, the designer can rotate 
the object about to obtain another perspective or zoom in 
on a troublesome detail. The results of changes made in 
one view can be immediately reviewed from other angles to 
determine their suitability. 

It is this merging of visualization of sculptured 

surfaces through high-level computer graphics and 


definition by mathematical representation which has been 





explored in this research. 
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CHAPTER ec 


B-SPLINE SURFACES 


The form of mathematical surface representation 
selected for implementation in the computer program under 
consideration is the surface B-spline. In particular, a 
nonuniform rational surface B-spline algorithm has been 
Utilized, though in its present form the program only 
allows the wser direct control of a subset of this, the 
uniform rational surface B-spline. 

The B-spline concept was developed by Schoenberg (10) 
in 1946 and introduced to computer-aided geometric design 
by Riesenfeld (€11]3 in 1973. Several properties of the B- 


spline curve or surface generation algorithms make them 


very suitable for sculptured surface modeling using 
interactive computer graphics. Briefly, the B-spline 
offers inherent curve smoothing, considerable data 


compression Ccomplex surfaces can be Fully defined with a 
small amount of data), local control Ca portion of a curve 
Or surface can be modified without affecting the entire 
Surface), the Flemibility Ob including sharp 
discontinuities ina curve or surface, anda convenient 
means of interactively manipulating the curve. 

This last property will be shown to be a particularly 
useful characteristic. Barsky and Greenberg CieJ discuss 


the vee tewley of performing shape design using 
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mathematical methods which require the designer to 
directly specify values for algorithm variables. Le s-ecan 
require an intimate knowledge of complex mathematics for a 
designer to be able to readily perceive the necessary 
adjustment to a mathematical algorithm which will effect 
the desired change in a portion of a surface. In 
contrast, modeling with B-splines requires virtually no 
knowledge of mathematics by the program user. Fish (C13) 
observed, "The nice thing about spline curves is that they 
allow you toa treat a collection of pieces of various 
polynomials as a single entity, maintaining continuity of 


tangent directions, curvatures, and so on without working 


at it.” Undoubtedly the same considerations led Rogers 
rts working with a number of mathematical Curve 
representations, to conclude that the B-spline was "most 


generally useful.” 

While a detailed understanding of the mathematics 
behind B-splines is not necessary in order to use them, 
some understanding will nevertheless aid the user in 
developing the ability to more quickly model a desired 
surface. A brief introduction Follows. More extensive 
treatments of the subject can be found in Rogers and Adams 
Citd, who provide useful examples, and in Bartels, Beatty, 
and Barsky (C153, who provide a particularly methodical and 


understandable approach. 





De 

2.1. Parametric Curves 
The Cartesian coordinates system is essential to most 
surface design. It is in this coordinate system that most 


oF the Formulations are presented with which the naval 


architect or aircraft sngineer will work to determine the 
performance characteristics of the craft. It is also 
Cartesian coordinates in which the graphics computer will 
require data to be presented for display and manipulation 
on the screen. At the same time, the Cartesian coordinate 
system has significant liabilities when working with 
sculptured surfaces. 

Most significantly, many sculptured surfaces or 
Curves cannot bse defined by an explicit Function (Ca 
Function having only one values of y for each value of x). 
The transverse section of a ship with tumble-home is a 
ready example. Also, 1t will be shown that calculating 
one Cartesian coordinate for a curve at even increments of 
another Cartesian coordinate can result in very irregular 
definition resolution. For these reasons, a parametric 
representation is’) preferable. The B-spline can be 
parametric. In a parametric representation, the Cartesian 


coordinate for a point on a curves is not defined in terms 


of the other Cartesian coordinate ¢i.e. yo FCxI), But 
coordinates are instead defined as functions’ of a 
parametric variable: thus, 


xP PMe CLD 





iS 
and 
y = gu), 
where w is the parametric variable. 

The parametric representation addresses both of the 
objections to the purely Cartesian coordinates. Implie et 
Functions in x and y can be handled without ambiguity and 
the resolution of the curve representation is generally 
much more uniform with equal parameter spacing than with 
equal Cartesian coordinate spacing. 

Rogers and Adams CitJ) provide an illustration similar 
to Figure 2, which compares representations of a circular 
arc using a nonparametric representation with data points 
at equal x intervals, using uniform parametric spacing, 
and using equal arc lengths. The nonparametric 


representation uses the relationship, 


UU SSeol=xs)e C1) 
The uniform parametric spacing uses a parameter, a, which 
varies from zero to one. The points on the curve are 
defined by 


x mlm) /Citu=) 
and 

iia / Gi =3— Ceo 
The equal arc length representation defines the points on 
the curve as 

x= ~coseé 


and 
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y = sine. (3) 


In each case, the arc is represented by a straight-line 


connection between six points. 





Equal X Spacing Equal Parameter Equal Arc Length 
1.0 1.0 1.0 
0.8 0.8 0.8 
0.6 0.6 0.6 
> > > 
0.4 0.4 0.4 
0.2 0.2 0.2 
0.0 0.0 0.0 
0.0 0.2 0.4 0.6 0.8 1. 0.0 0.2 0.4 0.6 0.8 1. 0.0 0.2 0.4 0.6 0.8 1.0 
X X X 
BPG. e's Comparison of parametric and nonparametric 
representations. 


While the uniform parametric spacing does not produce 
a resolution quite as uniform as that of equal arc 
lengths, it is clearly Superior to the equal x coordinate 
spacing. Sharpe and Thorne (16] discuss an approach far 
uSing the equal arc length spacing with a parametric 
representation, but more straightforward equal parameter 
spacing was felt to be sufficient for the purposes of this 
program. 

wo-Dimensional B-Splin 

The B-spline is most easily understood initially by 
looking at a two-dimensional uniform nonrational case, the 
Simplest Form of the B-spline. The B-spline curve 1S a 
piecewise polynomial curve. That is, the curve is broken 


into segments which are defined by separate polynomials. 





Ne, 
This curve is everywhere continuous, both in position and 
in up to the C&-2) derivative, « being the order cf the 
spline. 
The general B-spline curve is defined by: 
n 
QCud = & BsNz,%nCu) ct) 
Jc 
NiCU mimi ih Sr ei< Xe 4 


#= 0 otherwise 


CumxxzINz, wc—-1 Cu) CX gees UN: 2a Cy) 
Nia veeQU) = ———————_—— + 
Xr+wm—1i “Xz Kr+e"Xr+1 

where 

Gee cul ota. the cucve, 

n = number of control vertices, 

By = control vertices’ coordinates, 

K = order of the B-spline curve Cimplies 

degree (K-1)), 

Nr,«C€u) = B-spline basis functions, 

and 


Xx = elements of the knot vector. 

While it can be seen that the B-spline algorithm can 
be somewhat confusing mathematically, the use of it 1s 
actually quite intuitive. The curve being formed is 
shaped by controlling a relatively small number of points 
known as control points or vertices. The curve will not 
interpolate Cpass through) the control vertices, but will 


mimic the overall shape of the array of vertices. For a 





ve 
better visualization of this, the vertices are frequently 
joined by straight line segments, forming a control 
polygon. An example control polygon with its associated 
B-spline curve is shown in figure 3. The vertices are 
represented by the squares, the control polygon by the 
connecting straight line segments, and the B-spline curve 


by the curved line. 





eG. Ss TDG GeO CG Saas S Pde Me... CULV C ceeltldGh control 
pewligon. 

An apt analogy to the effect of the control vertices 
upon the curve is that of a set of magnets to a ferrous 
Wire. While the curve does not pass directly through the 
control vertices, it is molded by their placement, being 


drawn toward them as if toward magnets. Moving a control 
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vertex pulls the curve in the vertex’s local region in the 
direction of the movement. Placing vertices close 
together creates a stronger effect on the curve in the 
region of those vertices. 

Every point on the curve is a weighted average of the 
position of a number of control vertices. Each vertex 
has a unique basis Function, which defines the weight of 
the vertex with respect to the parameter «a. These basis 
Functions, polynomials in the parametric variable, are 
independent of the shape of the controlling polygon, being 
completely defined by the order Ck) and a knot vector. 

The knot vector divides the curve parameter Cu) into 
@ series of discrete values. This subdivides the B-spline 
curve into a series of segments defined by separate 
polynomials. The joined segments form a piecewise 
polynomial curve. If the divisions in the curve are 
equal Cthe knot vector specifies uniform step width 
between Knots), the B-spline is said to be uniform. 

The parameter « varies between an initial value and 
some Final maximum as the curve is traversed. Values of « 
that correspond to joints between the spans are called 
knots. In the case of a uniform B-spline, the knots will 
typically correspond to integer values of 4. The knot 
vector gives the sequence of these knots and is 
constrained to be non-decreasing. Thus the knot vector 


defines the range of the parameter uw which corresponds’ to 
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each segment of the curve. 

When the knot vector is specified, a multiplicity & 
at each end of the knot vector ensures that the ends of 
the curve interpolate the first and last vertices in the 
SQncrol powugoen. This is a very convenient constraint 
when performing modeling with a B-spline. The knot vector 
For a uniform third order B-spline with four vertices, 


ieeh Varies from zero to Cn-Kt+1), as £C0,0,0,1,e,e,e). 


The basis Functions, then, indicate the degree and 
extent of the influence of each control vertex. This 
provides the local control which was mentioned above. The 


maximum extent of influence of a single control vertex iin 





rage “2 esPOeatzen “efrfect of moving a single control 
vertex. 
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Parameter space is plus or minus half the order of the 

basis Function. Conversely, the shape of every span is 

affected by A successive vertices. Figure * illustrates 
the localized effect of moving a single control vertex. 

A comparison of figures S and & will demonstrate the 

effect of curve order upon the basis functions. Figure 5 


shows the values for the basis functions for a third order 


Curve with five vertices. Figure 6&6 shows the basis 
Function values for a fourth order curve, also with five 
vertices. In each case, the parameter « has been 
normalized to unity. Notice that the basis functions for 


the fourth order curve are generally lower in value at any 
Given value of «, But are nonzero over a greater range. 
Thus a higher order basis function yields a curve which is 
less markedly influenced locally by the movement of a 
Single control vertex, but which is smoother and more taut 
than a lower order curve. This effect can be readily 
visualized by examining figures 7 and 8, which show third 
and fourth order B-spline curves created by the same 
control polygons. 
A few characteristics of the B-spline curve will be 
convenient to Keep in mind when manipulating a curve: 
€1) The B-spline curve will have at most as 
many extreme and inflection points as the 
control polygon. 


C2) A straight line will be produced in the B- 
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0.4 0.8 
Normalized Parametric Variable 


0.2 0.4 0.6 0.8 
Normalized Parametric Variable 


Fourth order basis functions for five vertices. 





Third order B-spline curve. 
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ee 
spline Curve by & collinear EemtooL 
vertices. 
Coat Coli nea control vertices will yield a 
CULL Ve seamgencecOsLne Control polygon. 
C4) A knuckle, or sharp discontinuity, will 
occur at the point where &-2Z SOmnecol 
vertices are colocated. An example is 


shown in figure SQ. 





Fig. 9. Knuckle produced by collocated vertices. 


CS) Each span of a B-spline curve of order & 
tLigse Withim the jconvex tull of its A&A 
associated vertices. An illustration of 
ae concept is shown in figure 10, where 


the B-spline curve would lie in the shaded 
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area. 

AS previously mentioned, an advantage of the B-spline 
is the resultant data compression. Rogers and Satterfield 
Cae present an example wherein they successfully 
represented the forebody of a U.S. Navy ammunition ship 
using only a five by eight polygonal net with two- 
dimensional uniform B-splines. 

; race B- ines 

Nearly all systems developed for computer-aided 
sculptured surface design have defined the surface in 
terms of a net of lines. Typically, a series of B-spline 
Curves in parallel planes is intersected with another 
series of curves in planes perpendicular to the first. 
The result is not a true surface Gee inieien:, but 
definition of a net of lines lying on the _ surface. To 
define any point not lying on a net line requires an 
interpolative approximation. 

The program which is the subject of this study uses a 
true surface algorithm rather than such a network oF two- 
dimensional representations. The surface created 1S a 
mosaic of Surface patches, just as the two-dimensional 
Curve waS a piecewise polynomial curve, and the surface, 
like the curve, is everywhere continuous with continuity 
of the derivatives to a degree dependent upon the order of 
the basis functions. Control is achieved through 


manipulation oF a net of control vertices, with the 
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Pieelmmeeiiinie mm convex hall of a third order (Ca), 
Poureneorader Cb) andeavetbhvorder Cc) polugon. 





contral 


ov 


graph being analogous to the control polygon of 


the two-dimensional case. The control graph, as well as 


the surface, 


is three-dimensional. 


surface Cor tensor-product) B-spline is defined 


very Similarly to the two-dimensional spline as: 


where 
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Peco UCU Ww) 2 cu, wa. surface data 

points, 


parametric variables, 

number of control vertices in the 4a 
direction, 

number of control vertices in the ww 
direction, 

control graph points, 

order of the surface in the i 


Gi Eeccion, 





es 
Bs = OFoder of the surface in the Ja 
direction, 
Nr,«CudJ™ basis functions in the « direction, 


Ms,.CwI™ basis Functions in the w direction, 


Xx = elements of the Knot vector in the « 
direction, 
and 
Ys = elements of the knot vector in the ww 
Geer Eo mr, 


The computer program developed for this study 


implements a very direct approach to surface calculation, 


computing all basis functions initially, then performing 
the summation of equation (CS). A more efficient 
algorithm, based on the work of Cox and de Boor, is 


presented in appendix C-27 of Rogers and Adams (14). 

The surface B-spline is directly analogous to the 
two-dimensional B-spline in virtually every way, having 
very Similar properties extended into three dimensions. 
For example, just as the effect of moving a2 single control 
vertex was seen in two dimensions in Figure 4, the effect 
in three dimensions is shown in figure 11. CThe effect 
extends toward the back of the picture the same as toward 
the Front, although some of that effect is lost to view in 
this illustration due to depth cueing.) 

One difference between the two and three-dimensiocnal 


B-splines is the effect of a repeated knot vector. 3 








bag. 11, seca lkuzedeehGheeteof emovingea Single control 
vertex ina surface B-spline. 


knuckle can be introduced into a two-dimensional curve by 


use of a repeating knot value in the knot’ vector. The 
same is not true with a three-dimensional surface, unless 
the knuckle is desired across the entire surface, since 


the same knot vector is used for all sets of vertices in 
the « Cor w) direction. Repeating a knot For one or two 
positions in the control graph will result in repeated 
knot values for the corresponding positions in all sets of 
vertices in the net. For this reason, Knuckles will be 
introduced into the surface in this program only by 
colocating vertices. Multiple vertices will not indicate 


repeated knot values. This concept is dealt with in more 
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depth by Rogers and Satterfield (1,17). 
2c.t. Nonuniform Rational B-Splines 

The B-spline algorithm implemented in this program is 
a still more general case of the surface B-spline, the 
nonuniform rational B-spline CNURB). BOER NOnN-UnLeermLey 
and rationality extend the power of the algorithm, as 
explained by Tiller (C16). 

A limitation of nonrational B-splines is the 
inability to accurately represent circles, conics, and 
Quadric primitives. The rational B-spline can do i soa. 
Rationality refers to the addition of a fourth coordinate. 
Given a point in three-dimensional Euclidean space, 
f— (<,Useee ae CcoOrrespondingwepoint is now definedsn four- 
dimensional space, PamiGhx  HujpiizeH) . The #&# is the 
homogeneous coordinate and is constrained to be non-zero. 


By adding a homogeneous coordinate to the definition of 


each control vertex, the effect of that vertex is 
effectively scaled. Thus the B-spline algorithm now 
becomes: 
n m 
iy Glin eee y BV yt oNz. ne CudMs Tc Cw). C6) 
Pa 


Application of the rational B-spline to the development of 
surfaces is Further dealt with by Tiller. 

As alluded to above, the knot vector spacing can also 
be used in some cases to control the surface shape. Thus 


the algorithm implemented in this program will allow 
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nonuniform knot vectors. 

Because of their tremendous power and flexibility, 
nonuniform rational B-splines have been recognized now as 
an IGES standard for curve and surface definition (19). 
The Alpha_i project at the University of Utah Computer 
Science Department, working with Riesenfeld, has done much 
work in exploring the potential of NURB’s (C13). 

On the other hand, manipulation of the homogeneous 
coordinates and of the Knot vector does not produce 
intuitively predicted results. Since this negates one of 
the greatest advantages of the B-spline for interactive 
modeling, the user of the computer program developed in 


this work has not been given direct control over these 


variables. Uniform knot spacing, and a homogeneous 
coordinate of one, are default values for interactive 
modeling. By including these variables in the algorithm, 
though not under user control, the potential of utilizing 


nonuniform rational B-splines in an inversion algorithm 


Cdiscussed in chapter 6) is retained. 





Cee tet. 3 


Siete epee nolL INE SURFACE MODELING PROGRAM 


The end product of this study 1S a computer program 
For the Evans and Sutherland PS 300 computer graphics 
workstation which Facilitates the design and 
representation of sculptured surfaces using a surface B- 
spline. This program is known as SPLINE. 
3.1. Hardware 

The PS 300 is a distributed graphics system, 
employing itS own microprocessor for the processing of 
display-related data and relying upon a host computer for 
other operations. The host used in the development’ of 
Peas Progecheloweeme FerP=it7S4 with an RSX-11M+ operating 
system. The computer is the University of Washington’s 
Mechanical Engineering Department computer and is set up 
on a time sharing system. Memory for execution of 
individual programs is limited to 64% kilobytes, with 
extension to 128 kilobytes possible by specifying an 712 
Flag Gdecing ~compi lation. This flag overrides the 
reservation of memory normally restricted to system 
housekeeping tasks. 

The PS 300 station which was used is the single-user 
version of the Evans and Sutherland graphics workstation. 
Properly designated the PS 330, this unit is the most 


basic system of the PS 300 Family and 1s commonly referred 





33 
to by the family designation. The URle Vpenm whien thas 


program was developed was running PS Version ¢ Firmware, a 


preliminary version of the operating system and 
proprietary programming language. The Po soC 
workstation is) pictured in figure le. As can be seen 
there, the workstation 1S comprised of the control unit, 


display screen, Keyboard, data tablet, and control dials. 


Tv Te ie 9 
4 


4 RESEARCH Lag 





uci 2  sPSoes0OmenkstatiTons. 

Dies Scemtnol “Unit Consists cf a Graphics Control 
Processor, mass memory, and the Display Processor. The 
Graphics Senin. Processor is = Motorola 68000 
Microprocessor with et-bit address space and 256 kilobytes 
oF local memory for the graphics Firmware. A Full 


megabyte 1s available 1n mass memory, With LE=b LG 





ot 
GOmmunicacion With Ehe Grapmics Control Frocessor and 3ce¢- 
bit communication with the Display Processor, for very 
fast display access. 

The PS 300 display screen is a monochrome vector 
refresh display with 819¢e by 8139¢ resolution. White lines 
and characters are displayed on a Black screen with s1ixty- 
four levels of intensity. While solids with color shading 
cannot be displayed, the fine scaling of intensity allows 
display of wire frame models which are unusually easy to 
interpret. Through a feature called depth cueing, the 
intensity of lines is gradually decreased as their 
Gistance behind the plane of the screen is increased. 
This fading with depth helps to give the perception of 
three dimensions while viewing a model oan the two- 
dimensional screen. 

An additional benefit of depth cueing is that’ wire 
Frame lines in the background can be clipped from view, 
eliminating confusion with foreground lines. This is 
especially important since the PS 300 does not provide 
Hidden line removal. A comparison of Figures 13 and 14 
will illustrate this advantage. 

The Keyboard doubles as an input device for the 
PS 300 anda terminal for the host computer. Features 
include a full keyboard and twelve programable function 
keys with LED labels. RAR separate pad with eight 


programable control dials also features LED labels. 
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The coordinate position of a stylus oan the data 
tablet is converted to a digital equivalent for the 
positioning of a cursor on the’ = screen. This can be 
programmed for menu selection or picking of points or 
lines on a displayed model. 

The PS 300 performs graphical manipulations and the 
associated mathematical transformations independently from 
the host. The transformations and matrix concatenations 
are accomplished without the user having to program the 
matrix arithmetic. 

While Graphics manipulations can be performed 
Without host interaction, communication between the host 
computer and the PS 300 is essential for virtually all 
applications. The PS 300 has no local storage capability, 
so its program must be stored on the host system = and 
passed to the PS 300’s memory as ASCII data. The 
programming language available on the PS 300, which is 
unique to Evans and Sutherland systems, is Highly 
efficient for graphics display and manipulation, but other 
mathematics and data processing which would be 
straightforward in another high level computer language 
can be very difficult. The programmer must make a 
division oF the graphics application into graphics 
processing and analysis functions in accordance with each 
computer ’s strengths. An intelligent division can 


minimize Communication between the computers, tit 
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substantial communication tga remain necessary. 

Communication between the PS 300 and the host is 
accomplished through a S600 baud interface. Data transfer 
protocol is established through the PS 300 Host-Resident 
I/O Subroutines CPSIO’s}3. These are host-resident FORTRAN 
Subroutines which provide two-way communication between 
the computers. 

Sc. Programming the PS 300 

The PS 300 has its own high level ASCII command 
language with English-like commands, detailed in the Evans 
and Sutherland manual, Ps 300 ikemauter Graphics _Sustem 
C203. Structured objects are created and accessed by name 
with commands such as VECTOR_LIST Cto create an object as 
a list of vectors), TRANSLATE, ROTATE, and SCALE Cto 
perform the named operations). 

Models are created as hierarchical groupings of 
Graphical data, transformations applied to the data, and 
attributes such as iuntensity and level of detail. 
Primitive objects are defined and used to Build more 
complex objects. For example, an automobile wheel might 
be defined by means of a vector list, then instances of 
that wheel translated and rotated to create four wheels 
and position them relative to a separately defined body, 
Forming a representation of a car. A sample display tree 
is shown in Figure 15. The three basic forms of display 


tree nodes can be seen there: data nodes csuch as vector 
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Fig. 15. Display tree for an automobile. 
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lists defining objects), operation nodes (Csuch as 
translations and rotations), and instance nodes. Instance 
nodes group other elements together under a single name. 
Applying a transformation to an element results in the 
transformation of all subordinate elements as well. 

Manipulation and control of models is accomplished 
through the creation of Function networks. Values from 
interactive devices such as function keys or control dials 
are processed through user~designed function networks and 
applied to interaction points in the model’s'7 structure. 
The function networks are combinations of connected black 
boxe functions. These function blocks accept data, 
manipulate it according to predefined rules for the given 
Function, and output new values to another function input 
Or to interaction points in the display tree. 

For example, ADDER might be defined as an instance of 
the function, F:ADDC, which sums any number sent to its 
First input and a constant value held on its second input. 
If the function keys are connected to input one of ADDER 
and the integer ”"2” is sent to the second input, whenever 
a function key is pressed ADDER will output an integer 
equal to two plus the number of the key. The programming 
statements to accomplish this would be: 

ADDER: =F: ADDC; (Defines ADDER as an instance of 
the function, ADDC.3 


Se Gerla 18 <e>AbBER; (Putsethe value, e€, oan 
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ADDER’s constant input.3 
CONNECT FKEYS<1>:<1>ADDER; (Connects Function key 
GUE DUE Eo ADDER’s 
EELOGer Traut 22 
CONNECT ADDER<1>:Cinput and name of the element 
CO Vwnitch the sum iS 9.t6 Se 
sent) 

{Routes Gurout to desired 

feceatlan.ae. 

Avallable functions include mathematical operations, 
Boolean logic operations, routing Functions, and data 
Somversion. 

Else... SPEINE 

Figure 16 presents an overview of SPLINE, showing the 
interrelationship of ma jor hardware and software 
components. Items marked by dashed lines have not yet 
been implemented, but provision for future addition of 
these Features has been made within the program 
architecture and source coding. All programming on the 
mor) 1 was performed in FORTRAN language and all 
programming on the PS 300 was in the language described 
above. A more detailed description of the programs is 
contained in appendix A and the full FORTRAN and PS 300 
program listings are contained in appendices B and CC, 
respectively. 


Program execution will vary slightly depending on 
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whether it 1s desired to perform a freeform e2& initio 
design or to represent a previously Known Surface with a 
B-spline. In respect to this distinction, Wu, Abel and 


Greenberg Celi distinguish between shape design and shape 


representation. They identify shape design as having a 
primary concern of conceiving, displaying and modifying 
complex forms. Shape representation, on the other hand, 


ls characterized bya need to describe or approximate 
existing surfaces FOG the purpose et Graphical 
manipulation to enhance visualization or for geometric 
Salculatiagm CO permit quantificaticn. SPLINE will -- allow 
both approaches, shape design Cfreeform surface design) 
and shape representation Cmodeling a B-spline surface to 
approximate a previously known surface). 

If it is desired to represent a known surface, data 
points on that surface may be input through a two or 
three-dimensional digitizer or by direct creation of an 
appropriately formatted data File. The program will allow 
Screen display of these known points for direct visual 
comparison with the B-spline surface during modeling. In 
elther case, the user must select the number and initial 
relative position of the control vertices (by designating 
the size and shape of a planar matrix of points), as well 
as the order of the surface in respect to each of the 
parametric directions. Provision has been made for future 


addition of an inversion algorithm, which would calculate 
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acl oteecOmtrol vertex lecations te approximate known 
Suahace Gata. 

The control vertices, the B-spline surface and known 
Surface points may be displayed on the screen in any 
combination through Function key menu selections, and can 
be rotated, translated, or scaled in real time through use 
of the control dials. The B-spline surface is formed and 
modified by moving the control vertices about the screen. 
Vertex movement is communicated to the FORTRAN program, 
which recalculates the B-spline surface and sends a new 
Seetor list to the FS 300. 

Vertices are selected for movement by using the 
stylus on the data tablet to locate across hair on the 
screen over the desired vertex For picking. Individual 
vertices or entire rows or columns of vertices may be 
selected FOr movement. Movement 1s defined by 
manipulation of labeled control dials. 

Through the use of z-clipping, narrow sections of the 
model may be viewed without display of the remainder of 
the structures. This enables very accurate comparisons of 
any combination of display elements to be made very 
easily. 

B-spline surfaces are displayed as nets of constant 
parameter lines. Provision has been made for future 
Litem pneadt tom Of Ofthogomal plane intersection mapping, 


which would enable display OF more traditional 
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representations, such as waterlines and transverse section 
lines, yet based on the B-spline surface. 

3.4%. Operating Sustem Limitations 

Tesco ewe Me CUnSELOmallty Gf the program “is 
severely limited by what appears to be a problem in the 
Operating system or FORIRAN compiler of the eee 
computer. 

Hin InG”  pEOGramming, lt Was noted that previously 
trouble-free subroutines would often fail after adding 
seemingly unrelated lines of FORTRAN program. This was 
Found to be caused by variables changing value during 
program execution, but not under program control. Efforts 
to eliminate or program around this problem were not 
successful. Discussion with the Mechanical Engineering 
Department computer system manager and with Professor 
Ganter of the thesis committee revealed that the PODOP-11 
suffers from known operating system and compiler flaws 
which cause addressing problems resulting in similar 
sumptoms. 

While the exact manifestation of the problem varied 
with the state of program development, the current 


symptoms include failure of the host-resident input/output 


library subroutines cCPSIO’s) after execution of the 
Subroutine which calculates the B-spline surface. This 
precludes display of the B-spline surface. A slightly 


earlier version of the program will allow the &-spline 
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surface to be calculated and displayed, but at an 


Indeterminate time afterward will refuse to answer further 


Calls to the communication subroutines. This usually 
prevents modification of the B-spline surface once 
displayed. 


Troubleshooting efforts have included careful review 
oF the program for any definition of array elements 
outside of dimensioned array size, successful operation of 
each subroutine independently, and attempts to reestablish 
communication immediately after failure. The problem was 
Further clouded by consultation with the Evans and 
sutherland Software Technical Support Department (Cee), 
which indicated that use of the PSIO subroutines has been 
discontinued in favor of more reliable communication 
packages and that there are documented and undocumented 
Flaws in the preliminary PS 300 operating systems such as 
the one used for development of SPLINE. Nevertheless, as 
will be shown in chapter S, the project results are 
sufficiently successful to demonstrate the viability of 


such a computer program. 
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OPERATING INSTRUCTIONS 


4.1. Preparing Known Surface Data 


If ait iss desired to display Known points from a 
Surface for purposes of modeling a B-spline representation 
of the known surface, this data must be properly formatted 
before entering SPLINE. The data will automatically be 
Correctly formatted by the digitizing program if it is 
prepared through use of the two-dimensional digitizing 
program, Diet i. Or the three-dimensional digitizing 
Beegram, ODIGITS. However, the first parameter in the 
Global neader may need to be adjusted (see below). 

The PREPS input format 1s used for the preparation of 
known surface data. PREPS is a data pre-processor used at 
the University of Washington for conversion of data 
describing the geometry of an object into a PS 300 syntax- 
compatible data file. The input file format for PREPS has 
been adopted as the standard for data input to SPLINE in 
Gmaen ~tO Facilitate the use of SPLINE with other PREPS- 
compatible programs, such as DIGIT and DIGITS. 

The PREPS input file format is detailed in Calkins’ 
laboratory book C23]. A summary Follows. 

The data file format prescribes a glcbal header 
Followed by a series of subheaders, each with an 


associated set of substructure data. SPettib aud. ~allet 
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the display of individual data points represented in the 


data file, as well as lines sequentially connecting the 
data points within a substructure. Division of a 
structure into substructures will provide the most 


meaningful display if the substructures correspond to 
logical divisions in the actual structure. A common 
choice is the representation of profile lines or ' section 
contours as individual substructures. 

4.1.1 [ne global header. The global header is’ the 
BieSt OFraup of data in the PREPS-format data file and 
contains information  arfecting the display aye all 
substructures. SPLINE reads the data with a list-directed 
Format, so the exact format of the data in the file is not 
important. HOWEVET, the correct sequence must be 
maintained. 

The global header contains five parameters: 

ils: Z2NORM Ee nGonalig2gdtigm tector for “all 
data point coordinate values. 
This parameter should be set to 
the largest absolute value of any 


omeoG a: COOLaI Nate. 


es Ps hee not used by SPLINE. Should be 
set to l. 
Si. XBODY global translation of all data in 


the input file along the x axis. 


SPEcCNe assumes that the 
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er 


me. & 


substructure 
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normalized data runs from Oto l. 


If the origin is not actually at 


one endof the structure, use 
this to move the structure 
accordingly eer the most 


convenient display. 


Yaoi the same as XBODY, for the y 
coordinate. 

Ze0bY the same as XBODY, for the 2 
coordinate. 

substructure headers. Each set of 

data 1S comprised of seven subheader 


Parameters immediately followed by the substructure data. 


The subheader parameters are: 


1G 


oe 


NES 


Nose 


the number of data points in the 
SuBstructure. 

the number of repetitions of this 
substructure to be displayed. 
Normally set tol. If several 
identical substructures are to be 
displayed, this can be set to the 
number or repetitions and ICOORD 
Ese che SHOE elnace Whiten Varles 
between repetitions. The series 
of varied coordinate values is 


then entered for that coordinate 





or 


eee 3 


XTRAN 


YTRAN 


ZTRAN 


REE a 


1S 


in the data, one per substructure 


GESet LE cn . Examples appear in 
besan 
the coordinate which remains 


constant within a substructure, 
or varies between repeated 
SUNSESUC CUGeS. 
LEGORE ss 4 =x coordinate 
=<, y coordinate 
= 4352 coordinate 
“FO; moO repetition. 
translation of the substructure, 
in non-normalized coordinates, 
along the x axis. 
the same as XTRAN, for the y 
axis. 
the same as XTRAN, For the 2 
axis. 
the plane about which Make G ele 
image reflection occurs. 
eo ee wie Plane 
=e, xz plane 
= 3, xy plane 
— OF nO rer lection. 
For modeling purposes, te 1S 


usually best ee select no 
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Bet lecucioan, as discussed ih 

chapter 5. 
we SUpStrueccure data. Each subheader is 
immediately followed by the corresponding substructure 
data. The data is not paired for seach point, but is 
listed with all x coordinates first, all y coordinates 
next, and all 2 coordinates last. TET ILEOERE aAssnot setmto 
QO, only one value 1s entered for the constant coordinate, 


except as noted under NPTS2, above. 


A sample data File is presented belouw, ine Lud 1 need 
global header and swubheader with substructure data. 
Comments contained in brackets are not part of the data 
File. 

ae C2NORMI 

1 0 0 0 PONS thei-s me xe, 2 tChanslation, J 

6 sl i [First subheader; SB scincs, one 

substructure, x coordinate 
constant for substructure. J 

0 O O O ENE caanSlativenm, moa reflection. J 

Grose 7.00 BGamstanc x coordinate. 

=O 2ooe +00 =O scOceE Oe go. 1I9SITE+C0 

Oo 7e Oe —~OmEaae-Ol1 —@...@ C6 y values.4J 

son sock OO =On Zee +OO =O soot +O 

oO eds fad e010) =04387,0E+00 -O0.362E+00 C6 z values.4J 

7 1 at CBegin second substructure header.] 

QO QO QO QO 





O7eoSE+O 1 CBegin second substructure data 


4.¢c. Preparing the Computer System 


St 


tWeSaoem eo fun orl iINe. beth the PS 300 computer and 


the host POP-11 must be operational. Befors logging on to 


the host, it is suggested that the PS 300 be readied. 


SPLINE requires PS Version 8 firmware on the PS 300. 


The version can be checked by removing and inspecting 
disk installed in the lower right-hand corner of 
PS 300 cabinet. IF it is necessary to reload 
Firmware, use the following sequence: 
ee Turn oon the power switch located on 
display screen. 


e. Turn of F the power switch located = on 


Hpgea se Gcighnt=hana Corners of - Che rs 


cabinet. 

an Insert the PS Version 8&8 disk. 

his Turn on the cabinet power switch. 

Si: Wait for the DUAL LINE READY message on 
Gisplay screen, which should appear 


about Five minutes. 
It will be necessary to log on to the PDP-11 in 


normal manner in order to run SPLINE. 


pees NE Operating Instructions 


Halton lOReiniG  Oimeceetne cUPa= li computer, execute 


program Dy BRheeeing © RUN . SPLINE.” A series 


the 


the 


the 


the 


the 


200 


the 


in 


the 


the 


of 
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*"Working...” Statements will begin to appear on the screen 
as the PS 300’s program File is read from the disk _ and 
passed from the host computer to the PS 300 under FORTRAN 
Peogram control. 

pie ea eale Initial Formatting selections. After loading 
eieors 200 program, the LED indicators on the PS 300 
keyboard and control dials will contain illuminated labels 


and a series of questions will be presented on the PDP-11 


terminal screen. 


The initial question is, "Do you wish to display a 
known surface From a PREPS~-format File?” Answer ”Y” or 
ieee £EOr yes Or no. If a ”"Y” is entered, the user will be 


Prompted For the name of the data File containing the 
PREPS-formatted data. See "Preparing Known Surface Data” 
above. 

The next series of questions asks the user to specify 
the size of the initial control vertex matrix Ci.e. &,5) 
and the length-to-width ratio of the matrix. The maximum 
matrix dimensions which can be selected are (10,8). The 
minimum dimensions are (5,5). The initial SER eroL 
vertices will be positioned in the xy plane at z2=0, actin 
the user’s first response representing the number of 
SQMGER@e 8 VErtLices in the x direction and the second 
response controlling the number of vertices in the y 
direction. The selected length-to-width ratios bute 


determine the relative spacing between control vertices in 





=o 
Pie wex~eetEeectioOn Clenmgth) and that in the y direction 
Cwidth). Figure 1/7 illustrates the initial control vertex 
matrix resulting from selecting a matrix size of C€6,5) 


Suen a Lengeh-to-width ratio of 3. 


The user is Finally prompted to select the order of 
the B-spline in the longitudinal Cu) and transverse’ Cw) 
directions. Third or fourth order B-splines may be 
selected. AFter entering the selections, small cubes 
representing the control vertices will begin to appear on 


the PS 300 screen. 


EEE ca Ms ----2 - 


ooo 
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Po ano sSseNaeimuXnGrwecoOncaal VYertices with ia 
PwMtiem/siiteoth ratio of 3. 


Sete Enabling the PS 300 keyboard. After all 


initial Formatting selections have been made Cin response 
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to display screen prompts), the following message will 


appear on the screen: 


ee eee ee ee ee ee ee ee ee ee 


co PResomecC comin | ~2TNE/ LOCAL > ** 
ae CNet eco sOCe Key BORE ie 
ag mob eewWetes y= < fE RM "me 


HE AE Me Me Me Me ME A HE ME AE A EG HE SU A ee HE A HE HEE HE NU HE AE HE HE 


The LINE/LOCAL and TERM keys are located in the keypad at 
the left side of the PS 300 keyboard. Press the 
LINE/LOCAL key while holding down the SHIFT key. This 
enables the twelve Function keys at the top of the 
keyboard. Press the TERM key if it is desired to remove 
the text display from the screen. 

4.3.3. Control dials. The control dials are labeled 
by LED indicators and have the following Functions: 

GLOBAL X moves the model in the x direction in 
the screen coordinate system Cleft and 
Bal eieos. 

GLOBAL Y moves the model in the y direction in 
the screen coordinate system Cup and 
Cow ns. 

GLOBAL 2 moves the model in the z direction iin 
the screen coordinate system Cin and 
out of the screen). As the model 
moves into the screen Caway From the 
viewer) past the z=0O plane, depth 
Cueing will cause portions of the 


model to fade, creating the illusion 





grees sate, 


memeclon 


meinecclions 


available: 


Fed. 


Ss 
OF depth. Depth cueing can be 
disabled by moving the entire model 
Forward of the z2=O plane Ctoward the 


viewer) with the GLOBAL 2@ dial. 


SCALING scales the entire display, allowing 
the user to examine details of the 
display more closely. 

ROTATE X rotates the model about the screen’s x 
Ghoti zontal ea: Si. 

ROTATE Y rotates the model about the screen’s y 
Cvertical) axis. 

ROTATE 2 rotates the model about the screen’s 2 
axis Cturning it within the plane of 
Ene Sehee»n.. 

Main menu. The LED labels above the keyboard 
keys present the main menu, from which SPLINE 
are selected. The Following options are 

VERTICES is a three-way toggle controlling the 


display SEy. che Control vertices. 
Vertices are displayed on the screen 
as small cubes. Pressing the Fl key 
selects one of the Following options, 
in sequence: 

Cl) vertices displayed, 


C2) vertices displayed with straight 





Re 


ES 


F4 


Base ei NE 


KNOWN PT 


PNG eReaey 


So 
lines connecting them in matrix 
position order, 

C3) vertices not displayed. 

toggles GiTsalau, or the B-spline 
Surface on and off. When the Fe key 
is pressed, the B-SPLINE label above 
Ene wenree, wid blink while the. .host 
computer calculates a vector list for 


the B-spline surface and sends it to 


Cheers ~3Cor When the surface 1S 
displayed, the label will cease 
blinkeeng . 


1s a three-way toggle controlling the 


display OF known surface points 
GCoOmtcained Wim a PREPS-fFormat fies 
Points are displayed as asterisks 
CAS). Pressing the F3 key selects 
One of the Following options, in 
sequence: 


C1) known points are displayed, 

C2) known points are displayed and 
Pei neS wal thiegesebstructures are 
connected in sequence by straight 
lines, 

C33 known points are not displayed. 


EO eseeoleINE “into amd Cue sf the 





pe. 


eye 


S7 
interactive modeling mode, Giving the 
user the ability to manipulate control 
Hoan: Sesi tions . When the F4& key is 
pressed, Several Function key and 
control dial labels change to indicate 
new assigned functions or availability 
of previously assigned EUnECELZensS: 
Interactive modeling is discussed in 
SCCEMOn 2.245 Delon. 
Eeegles@zeellipping Greanaeeort . When 
Z-Clipping is enabled, only portions 
GOfwethe medel Buing @isenin a narrow 
band parallel to the plane of the 
screen can be viewed. This allows 
Slices or sections of the model to be 
viewed without confusion caused by 
lines in front of and behind the 
section being examined. When the FS 
key is pressed, the screen will be 
blanked and a CLIPPING label will 
appear above the eighth control dial. 
Turning the dial slightly will cause a 
Slice of the model to be displayed. 
Adjusting the CLIPPING dial will vary 
the depth of the slice which is 


displayed. Bi cub name the GLOBAL 2 





PS 


rd 


Renal este al: 


Ns 


So 
dial, it 1S possible to move the model 
Ciaegeg@e- tie GClieping window, allowing 
the viewing of any portion of the 
model. Note that it 1S possible to 
move the model entirely outside of the 
Ciapoing Window, im which’ )case 1 
cannot be viewed. 
has not been implemented. When 
implemented, it will toggle on and off 
Ghee adisplau of a rceflection of the 
model about its XZ plane. This label 
ise not be displayed during 
interactive modeling, indicating that 
the Ben veeeLon PUnece Lon is Rot 
available at that ime. Srnis 
prevents the updating of the reflected 
surface From slowing down the 
computer’s response to interactive 
Mpecs during modeling .2 
has not been implemented. When 
implemented, this key will toggle on 


anewewore the Ggisplay of intersections 


Of the XY plane Chedu—f ied 
coordinates) Hate. the B-spline 
surface. On a ship model, this 


corresponds ES the display of 
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eee 


Feo 


fel) 


Wee 


XZ 


Ao 


Ret, f 


Sg 
waterlines. Pit SeesUmecclon. Ss Rot 
available during interactive modeling. 
has not been implemented. When 
implemented, ne Will Function 
Similarly to the F7 key, described 
above, and i eld display lines 


corresponding to aeship’s' buttocks 


lines. 
has not been implemented. When 
implemented, se Tse Funcclen 


Similarly to the F7 key, described 
above, and will display lines 
corresponding to transverse sections 
oF a ship hull. 

selects the Prplicy out ouc menu. 
Pressing this key causes the labels 
above the function keys to display a 
menu of input and output Functions 
described in section 4.3.6, below. 

is a three-way toggle which resets the 
displayed model to each one of three 
orthogonal views, in sequence. 
Pressing the Fll key resets the scale 
Factor and global translations ce 
those of the initial display and 


Orients the XY, X2, or Y2@ plane of the 
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model parallel oc the screen. 
Repeatedly pressing the key will cycle 
the display le igleyerel ia the three 
orientations. This Function key is 
particularly useful when orienting the 
model for display of slices with the 
Sire ane tLe 
pe. Guilt stops execution of the program and 
initializes the PS 300, clearing the 
screen. If it is desired to use the 
keyboard to communicate with the host 
computer at this point, press the TERM 
key to return the screen to a text 
display mode, then press the 
LINE/LOCAL key, Followed by RETURN. 
The host computer’s prompt should now 
be visible. 
aa. Interactive modeling. The interactive 
modeling mode is entered and exited by pressing the 
INTERACT CF4) key. This mode is the heart of the computer 
program, allowing the user to select and relocate control 
vertices in order to mold a B-spline surface. 
When the FY key is pressed, the labels above the 
three global Seanslation CGencrol dials CGLOBAL xX, 
GLOBAL Y, and GLOBAL 2) change to VERTEX X, VERTEX Y, and 


VERTEX 2 and begin to blink. These dials can now be used 
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to move the selected vertex in the indicated direction in 
the body-fixed coordinate syster. If it is necessary to 
move the entire body, the global translation functions can 
be restored by toggling the interactive modeling function 
OFF with the F4 key. The blinking labels will remind the 
user, while in the interactive modeling mode, that dial 
movement will relocate vertices rather than translate the 
entire model, in order to prevent inadvertent movement of 
vertices. 

Individual control vertices are selected for movement 
with the stylus and data tablet. When the tip of the 
Stylus is placed near the surface of the data tablet, a 
tracking cross will appear on the screen. By moving the 
stylus lightly over the data tablet surface, the tracking 
cross can be positioned over the desired control vertex. 
The vertex is then selected by pressing the _ stylus 
momentarily against the data tablet surface while keeping 
the cursor positioned over the control vertex. This 
activates a switch in the tip of the stylus, causing the 
Gata tablet to report the stylus position, leading to 
identification of the selected vertex. The vertex can 
then be moved into the desired position with the vertex 
translation dials. If it is necessary to reorient the 
model in order to obtain a better view or reduce ambiguity 
for the selection or location of control vertices, this 


may be accomplished with the rotation dials or RESET 
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Function key, which remain operational while in the 
interactive modeling mode. 

When a control vertex is relocated, the movement is 
reported in increments to the host computer, which 
recalculates vector lists defining the B-spline surface 
and the net of lines connecting the vertices. If the 
vertex-connecting lines or B-spline Surface are displayed 
while in the interactive modeling mode, some delay will be 
noted between the time of vertex movement completion and 
the corresponding change in the model. This delay is due 
to the time required for the host computer to communicate 
the updated vector lists to the PS 300. fhe delay will be 
about two to three seconds for update of the vertex- 
connecting lines and about ten seconds for update of the 
B-spline surface. 

When the interactive modeling mode is activated, the 
label above the F7 key will read "PICK ROW.” Pressing 
this key will alter the control vertex selection function 


such that selections made with the stylus will affect an 


entire row or column of vertices at a time. The column or 
row is selected similarly to the selection of an 
individual vertex, except that the cursor is placed over 


one of the vertex-connecting lines in the row or column, 
instead of over the individual vertex. Turning the vertex 
translation dials will then move the selected row or 


column of vertices in the desired direction while 





Se 
Gecalming Che Grientation of Che individual points within 
the row or column to each other. The user can return to 
selection of individual control vertices by pressing the 
merekK PI” CFB) key. 

AFter moving a vertex i1t will occassionally be 
noticed that the vertex-connecting lines will not quite 
reflect the new position of the vertex. Since the vertex 
movement is reported to the host computer incrementally, 
it is possible that a slight additional movement will 
trigger the update. At other times, a Flaw in the 
communications between the host computer and the PS 300 
Causes an incremental change to be reported to the host as 
a very large or indecipherable movement. In that case, 
the distorted movement value is disregarded by the host 
program, which results in loss of the true incremental 
change. While there is no way to reconcile the difference 
between the control vertex position as viewed on the 
screen and that held in the host computer’sS memory, it 
should be noted that the intersection of the vertex- 
connecting lines, and not the vertex cube, will indicate 
the true position upon which the B-spline surface will be 
calculated. 

foe (in pwit/Gukpwt ment. The input/output menu is 
displayed in the function key labels when the 1/0 CF10) 
key iS pressed. The menu Functions have not yet been 


implemented Cwith the exception of the Fle keyJ, but when 
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implemented will offer the Following options: 


Fz 


Ee 


Ee 


Ps 


nie 


Peek rk 


Pe aoe iN 


SAU VERT 


LD VERT 


Eat i770 


Prints a list of the current 
vertex locations and of the 65- 
spline surface order selections. 
plots a drawing of the model, as 
Oriented and displayed on the 
screen, on the laser printer. 
saves the current vertex location 
and surface order information to 
a disk file. 

loads vertex location and surface 
Order information from ae disk 
file created with the SAV VERT 
BUnCt Lam. 

returns the user to the main 


menu. 





Char oka 


BeBe ENG teernNIGUES ANG CASE STUDIES 


The B-spline modeling of sculptured surfaces greatly 


reduces the requirement for the more traditional 
techniques of surface development’ and representation 
reviewed in chapter 1. As was shown there, use oF the 
traditional techniques requires that engineering and 


Grafting skills be accompanied by an artistic touch in 


order to visualize and fair the surface in three 
dimensions. This ability is developed by the naval 
architect, and others who work often with sculptured 


Surfaces, through years of experience and practice. 

On the other hand, while the B-spline techniques 
deemphasize the artistic requirement, it will still be 
necessary for the designer to develop an intuition for the 
placement of control vertices which cannot be entirely 
reduced to a set of mathematical rules without sacrificing 
the control and Flexibility of interactive modeling. The 
heuristic observations and case studies which follow are 
offered in order to Facilitate the rapid acquisition of 


eiateimMeet tion. 


S.1. Modeling Tips and lechniques. 


[ea 2. —KKnewnudata. If the surface design is not to 
be developed 26 initio, the preparation of a data file of 


known surface points will be essential. The selection of 
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such points for inclusion in this data file requires some 
consideration and advance planning. Primarily, the goal 


is to select sufficient points to accurately represent the 


Form and boundaries of the surface, yet not so many as to 
create unnecessary clutter when the known data is 
displayed. 


Two other considerations should be kept in mind 
during data point selection. First, the practicalities of 
displaying and visualizing the two surfaces which are to 
be matched Cthe known surface and the B-spline surface or 
control graph) dictate that most of the modeling be 
performed while viewing two-dimensional sections Cor very 
thin three-dimensional sections). This generally means 
locating control vertices nearly in the planes of known 
substructure data, such as the planes of ae ship’s 
transverse sections. Greater Flexibility will be 
available in locating the control vertices for maximum 
surface control if the vertices’ general locations are 
considered before finalizing the file of known surface 
data. Sections 5.1.3 and S.1.% will address the problem 
of vertex placement. 

Secondly, if a symmetrical body such as a ship hull, 
automobile body, or airplane fuselage is being modeled, it 
Will generally be easier if only one half of the structure 
is displayed, both of the known surface data and of the B- 


spline surface and control graph. Modeling two identical 
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halves requires twice the manipulation as modeling a 
Single half and results in much more GEE Iiculeu 
interpreting the wire frame model due to ambiguities 
between lines in the foreground and those iin the 
background. It is also virtually impossible to exactly 
duplicate the control graph for the halves of the body 
through a purely visual comparison. The only drawback to 
modeling a single half of a symmetrical body is that it is 


more difficult to ensure fairness at the juncture of the 


two halves. This problem can be remedied through use of 
the reflection display Function, when that Function is 
implemented. 

oS .8.  Surmace order. SPLINE offers the choice of 
Ewo surface orders: third order or fourth order. The 


order may be specified independently in the « and ww 
directions. As noted in chapter e, a Fourth order curve 
produces the smoothest lines, but at the expense of some 
local control and the ability to easily effect sudden 
changes in curvature. It should also be remembered that a 
Fourth order curve requires three coincident vertices Cor 
rows of vertices) to create a knuckle or chine, while the 
third order curve requires only two. 

The third order surface will normally produce 
satisfactory results with the least amount of effort. The 
Fourth order curve should be considered where smoothness 


of lines is an overriding constraint, such as in the 
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longitudinal lines of some ships and aircraft. 


sey lta The SOnGEOL socaph . Selection of the 
dimensions of the control graph (Ci.e., the number of 


vertices contained) is best accomplished by considering 
Che locations where control points will be required for 
sufficient control of the surface. The most obvious 
considerations include: 

C1) Vertices will be required to define the 
boundaries Cends and edges) of the surface. 

C2) A vertex or row of vertices will generally 
be required at each maximum or minimum 
POrmme. 

C3) Particularly sharp curvatures or sudden 
changes in curvature will generally require 
two or more control vertices to achieve. 
Inflection points will require sufficient 
control vertices on each side of the point 
COE eemGlLeECeELioOm to establish curvature in 
Opposite directions. 

C4) Knuckles or hard chines will require two 
coincident rows of vertices in ae third 
Order surface or three coincident rows of 
vertices ina fourth order surface. 

(53 While there is mo constraint imposed by the 
B-spline algorithm nor by the computer 


program which would dictate that control 





Ge 
VEGEICES SUREnig- a Foueor calumn sof the 
control graph remain in ae plane, the 
practicalities of modeling usually makes 
such placement the wisest choice, as 
discussed above. In most cases, comparison 
with known surface points will be most 
efficiently accomplished if the rows Cor 
columns) of the control graph are parallel 
to the known-Surface substructures. It is 
not practical to constrain both the rows 
and the columns of the control graph to 
planes, but with one or the other so 
constrained, some effort should be made to 
keep the other inas close to ae planar 
placement as possible. This will be 
emphasized By the case study in 
section S&.3. 

After the number of control vertices has been 
established, required manipulation of the vertices can be 
minimized by selecting a length-to-width ratio for the 
initial control graph which approximates that of the body 
to be modeled. This will be illustrated in the case 
Seales which Fallow. 

a ott. Conteoli = vertex placement. The approach to 
control vertex placement which was found to be most useful 


is to first locate the rows or columns of the control 
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Graph in the desired plane and then to use the CLIP 
Function to compare an individual row or column of the 
control graph with the nearest substructure of the known 
surface data. In this way, most of the interactive 
modeling is performed in the more readily visualized two- 
dimensional realm. Placing vertices is primarily a matter 
of Keeping in mind the general properties of the B-spline, 
as innumerated in chapter ec. Those properties are briefly 
reviewed below. 


C1) The B-spline curve does not interpret the 


Eontrel. polugen, But is contained within 
its convex hull, taken A vertices at a 
time. This dictates locating the control 


vertices slightly outside of the curvature 
OF the desired surface. 

C2) The B-spline surface interpolates the 
EOEHNESS GE che control graph. 

C3) While modeling is most efficiently 
performed in two dimensions, it must be 
kept in mind that the influence of - each 
control vertex is three-dimensional. This 
Will occassionally require moving a vertex 
From its apparently proper position in two 
dimensions to accommodate some sudden 
change in the surface in the ina Ge 


dimension, or to avoid distorting the 
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Surface by locating a vertex far From the 
plane of the remainder of its row or column 
ineeMnsS.COonrral craph: 

C4) The slope of the curve at the end points of 
the control polygon is determined by a 
straight line connecting the end point with 
the next point in the polygon. Again, the 
effect of vertices in the third dimension 
may cause unexpected deviations. 

CS) A straight line is produced by K collinear 
vertices. 

C6) A curve tangent to the control polygon is 
produce by &A-2Z collinear vertices. 


C7) A knuckle is produce by &€&-2Z coincident 


vertices. 
S.1.5, Menu selections. The selection of display 


options from the menu can have a significant effect on the 
efficiency with which interactive modeling is performed. 
The requirement for displaying the control vertices is 
obvious, but it is useful to display the lines connecting 
the vertices of the control graph as well. Display of the 
connecting lines prevents confusion concerning the 
identity of a vertex in respect to its position in the 
CemeErol Graph matrix. [RaEeuomeointS 2med Control polugen 
are inadvertently interchanged, the result can be dramatic 


anomalies in the B-spline surface. 
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The CLIP function should be used as much as possible, 
Since accurate depth perception is difficult with a wire 
Frame model, even with depth cueing. This FURCELOM. 77S 
best disabled, however, when rotating the model. The 
RESET function is particularly useful for orienting the 
model for viewing sections in orthogonal planes with 
elipping. 

While the object of the modeling is to mold a ®B- 
spline surface, most of the initial modeling is best 
performed without constant display of the surface. 
Display of the B-spline surface adds a profusion of lines 
to the already crowded screen display and slows response 
time considerably, since the host computer must 
communicate a new vector list for the surface to the 
PS 300 each time a vertex 1s moved. Due to the highly 
intuitive nature of B-spline manipulation, it is possible 
to achieve surprisingly accurate results by making the 
initial placement of control vertices without viewing the 
resulting surface at all. Due to the current limitations 
of the operating system, the images presented in the three 
case studies which follow were generated in this manner. 


Once the B-spline surface was initially displayed, further 


manipulation was not possible, as discussed in 
section 3.4%. As will be seen, little Further manipulation 
would be required EOS very accurate surface 


representation. 





73 

5.1.6. General procedure. The basic procedure for 
performing surface modeling with SPLINE can be summed up 
in a few steps. 

C13 Preplan the initial placement of control 
graph rows and columns and select 
corresponding control graph dimensions. 

C23 Do as much control vertex placement as 
possible by moving entire rows or columns 
of the control graph at a time. 

C33 Use the CLIP function while modeling 
substructures in two dimensions, initially 
Without display of the B-spline surface. 

C4) After initial control vertex placement, 
view the entire control graph in three 
dimensions. Ensure that the individual 
control graph rows and columns do not “/)ave 
undesired extremes. 

CS} Display the B-spline surface. 

C63 Make minor adjustments to the control graph 
as needed. 

sc. Case Study #1: Modeling the Australia I! 

The first case study is a model of the hull of the 
Sailing yacht, Australia II, excluding the famous winged 
keel. This case study illustrates the general approach to 
modeling a B-spline surface to an existing known surface 


or to preliminary design lines. The known surface data 
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was extracted from a lines drawing Cfigure 18) contained 
in Stannard’s biography of Ben Lexcen Ceu4). 

Before entering SPLINE, the Known surface data was 
put into a PREPS-format file by digitizing it from the 
lines drawing with the two-dimensional digitizing program, 
DIGIT. Transverse sections were designated as 
substructures with about six to ten points’ each. Since 
the body plan presents the Fore and aft section profiles 
on opposite sides of the xz plane, it was necessary to 
manually modify the data file created by DIGIT to place 
all half-section profiles on the same side of the plane. 
This was a simple matter of deleting minus signs from the 
data. 

The Final step before entering SPLINE was to 
determine the required control graph dimensions. It was 
apparent that modeling would be performed most 
conveniently in two-dimensional sections corresponding toa 
substructures of the digitized data. Since the body shape 
was relatively uncomplicated in the body plan, it was 
decided to wse only five rows in the control graph. 

The longitudinal lines of the yacht required greater 
consideration. It will be useful to view figure 19, which 
shows the selected control graph as squares connected by 
net lines and known surface points as unconnected 
asterisks, while examining the selection process which led 


to this control graph. The most easily selected locations 








Pela Chie, Pitta leeconeaol. Groep fOrw.Austradza git, 
after relocating columns to Known hull stations. 


For columns of the control graph were a station at each 
end of the Aull to, define those boundaries, and a station 
to define the maximum point of the keel. Since the shape 
oF the forward sections is relatively uniform, ee 
additional stations were expected to be sufficient toa 
define the forebody. 

The after half of the hull presented more interesting 
problems. The stern is not a V-shaped section, as most of 
the hull, but a U-shaped section. The stern also has a 
short portion which is somewhat elevated and very narrow, 
with nearly parallel sides. A second station was selected 


at the stern to help maintain the shape and size in that 
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Beg Lon. 
Between the keel and the stern, the transition from 
Powe SlCCElGm to the U-section is relatively abrupt, as 
Can be seen in figure 2&0, which shows the two consecutive 


Eoeansverse sections. CAsterisks represent the known 


surface points.3 A control graph column was selected for 





Pee ce Os: Abrupt transition in the after hull of 
Rustralia2a Il. 
each oF the aillustrated sections, ee! define the 
approximate beginning and end of the transition region. 
It was expected that additional control would be required 
to ensure that the U-shaped station did mot unduly 


influence the hull forward of the transition, mor the ve 


shaped section influence the shape aft of the transition. 





we 
The proximity of the two control graph columns selected 
for the stern was thought to be sufficient to maintain the 
shape between the U-shaped station aft of the transition 
and those at the stern. An additional U-shaped station 
was selected adjacent to the one located just forward of 
the transition, tO minimize influence of the U-shaped 
SeelbiGnSs Forward of the transition. This made a final 
count of nine columns. 

Upon entering SPLINE, a control graph size of (9,5) 
was selected, based on the above planning. The basis 
Functions were defined as third order in both directions, 
and an initial control graph Jlength-to-width ratio of 


eleven was chosen to roughly correspond to that of the 
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memo). The resulting initial control graph can be seen in 
Figure 21, along with the digitized known surface data. 

ImEeractive modeling sf the yacht hull was begun hy 


selecting the ROW PICK Function and moving the control 


Graph columns into the selected positions, as shown in 
Figure 19. The RESET function was then used to orient the 
hull for a bow view and the display was scaled to fill the 
screen. The CLIP function was then activated and the 
Clipping window adjusted to a depth which allowed viewing 
the control vertices and known points of a Single 
transverse station at a time CFigure 22). 


Individual transverse sections were modeled one at a 





mao ewe A station of the @ustralia II before 
modeling. 
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time by selecting and moving the control vertices 
Mcevidtictttieeamna  mMayvying Ehe hull throwgh the clipping 
Window with the GLOBAL 2@ dial to view each new station. 
All five control vertices were located coincidentally at 
the bow. Figure @3 shows a more typical station with 
relocated vertices. Notice that the vertices are located 
Slightly outside of the curvature of the known surface, 
Since the B-spline surface will be contained in the convex 
Deon ecMeeCOntCcol graph, But will not interpolate it. 
This offset is exaggerated in the illustration. The 
small tabs extending From the control vertices are the 


control graph lines which extend beyond the clipping 


window to vertices in other control graph columns. 





i ec omeemeontrol solugom —or a U-shaped station. 
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Figure et illustrates the control polugon For a U- 
shaped section. The control vertices at the right are 
located above the bottom of the hull in order to remain 
outside of the Curvature which occurs in the longitudinal 
direction Cperpendicular to the screen). Three collinear 
vertices are used to define the flat bottom between the 
two right-hand points, as well as the slope of the bottom 
as it begins the upward curvature between the second = and 


third collinear vertices. 





Poe de eCoanehe ee uGohnwhOr a) U-shaped section. 


Pie wee tia ec onclol Ghapm LS plcewred” in Figure ¢5. 
Notice that the net of lines is uniform in both the 
transverse and longitudinal directions. The resulting B- 


spline surface is shown in figure 26 with the known 
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surface points for comparison. The match 1s generally 
Quite good, but an additional cantrol graph column is 
needed near the bow to hold the keel line downward. A 


Closer view of the transition from U-shaped ta U-shaped 


sections is shown in figure 27, which depicts the B-spline 


surface and its associated control graph. 


Ser ae oe on 
. ; 


a) 





nig, aye ssline model af #ustralia2 II stern. 

The next step in modeling the hull would be ta again 
view the transverse stations one at a time and make minor 
adjustments in the cantroal graph. Figure ¢c8 campares the 
control vertices (squares), known surface Casterisks) and 
B-spline surface Csolid line) For a V-shaped station. Lt 
can be seen that only very minor adjustments are 


indicated. 





Fig. <8. B-spline surface at a V-shaped station. 


B-spline surface at a U-shaped Seen 
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Figure @3S shows the B-spline surface achieved at a U- 
Shaped section and illustrates one of the pitfalls of 
considering primarily two-dimensional sections while 
modeling a three-dimensional surface. The three collinear 
vertices at the bottom would dictate a straight line in 
the right-hand segment of the B-spline curve in two 
dimensions. However, the surface is pulled downward at 
the right-hand edge by the effects of the vertices at 
stations located further forward. RA considerable upward 
adjustment of the right-hand control vertex may be 
necessary to overcome this pull from other stations. 

S.3. Case Study #2: Modeling a Porsche 9t'4 

The second case study involves very Similar 
considerations to the first and will be presented more 
briefly. The Body of a Porsche S344 automobile was 
modeled, reemphasizing the techniques discussed previously 
and illustrating the versatility of the B-spline and of 
See lNE . 

The known surface data for the Porsche was 
approximated by digitizing points from a lines drawing and 
profile contained in advertising literature. Once again, 
DIGIT was used to create the data file. The data for half 
OF the symmetrical body was presented to SPLINE without 
reflection. 

The shape of the surface was considered in order to 


estimate the required dimensions of the control graph. 
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Figures 30 and 31 illustrate the selection of transverse 
stations for modeling, similar to those chosen for _ the 
previous case study. In this case, the control graph is 
presented in an edge view. Looking first at the 
longitudinal lines, it was determined that ten control 
graph columns would be required. A station was selected 
at each end, another near the front Cto avoid the problem 
encountered in modeling the bow of the Australia II), and 
a station near the middle at the point of maximum height 
in the profile. Two stations were determined to be 
necessary to achieve the small-radius curvature at the 
base of the windshield, and two more at the top. Finally, 
two intermediate stations were positioned in the rear half 
Of the body. If an eleventh station had been available, 
it would have been place midway along the hood of the 
automobile. 

With consideration to the shape of the transverse 
sections, seven control graph rows were deemed necessary. 
Figure 32 depicts a section across the hood being modeled 
and illustrates the reason for selection of seven control 
graph rows. Since the sharp curvatures and sudden 
transitions in the body dictated use of a B-spline which 
was third order in both dimensions, three vertices were 
required to achieve the nearly Flat hood and roof of the 
automobile, with an additional vertex at the hard chine 


between the hood and fender. CThe brighter vertex seen 
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there Boe actuUsllyueeEwes Coincident vertices.) Three 


vertices mold the curve at the side of the automobile. 





Fig. de. Modeling a fForebody section of a Porsche S44. 


As detailed previously in case study #1, interactive 
modeling was performed by First moving control graph 
columns to the selected stations, then modeling individual 
transverse stations with clipping enabled. Examining ene 
Semerol  Vertices sof Figure 3e@ From right toa left, the 
First three vertices are placed nearly linearly to give 
the meaeriy flat surface cf the heed. The third end fourth 
vertices are placed at the same point to achieve the 
knuckle. The Fifth vertex serves two functions. . The 
Piaommomlucom line cGonnecting this vertex with the 


vertices at the knuckle defines the slope of the curve as 





Bs 
1t Flows downward from the knuckle. The position of the 
Fifth and sixth vertices define the maximum for the curve 
in the fender. Finally, the last vertex defines the lower 


boundary of the surface. 





poke. =35, COnerod. Graph and Knowm surface for a 
Hersche St. 


Figure 33 presents the Final control graph after 
Receling | the individual Sections, along with the known 
surface data. While each individual station appeared to 
be adequately modeled, displaying the control graph lines 
CFigure 34) revealed a problem. Near the midsection of 
the automobile, one vertex was placed much lower on the 
body’s contour than the corresponding vertices in adjacent 


columns. While the placement had appeared adequate when 
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inconsistency in one row at the midsection. 
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Viewed in the transverse plane, it was now apparent’ that 
Chis vertex was sharply out of position when viewed as 
Babe Of its control graph row. 

The effect of this placement can be seen in 
Seauise ao.) lweh of the apparent Gistortion im the body at 
Che midsection is only an illusiom caused By the manner in 
which the net of lines representing the B-spline surface 
1s displayed. Some real distortion does also occur iin 
this region due to the added pull of the misplaced vertex. 
This case study illustrates well the importance Or 
considering and reviewing the control graph in three 


dimensions. 


Figures 35 and 37 present comparisoms of the B-spline 





Pico eee SO lime Subface With a hard chine.. 








Fig. 37. B-spline representation of a Porsche surface. 


surface to the control vertices and known surface points. 
Note that the two coincident vertices in figure 36 produce 
a hard chine, while placing the vertices slightly apart, 
as in figure 37, produces a small-radius curvature. 

The effect on this station of control vertices at 
other stations can again be seen in Figure 36, where the 
surface of the hood is pulled up from the desired form by 
the control vertices at the next station, which are 
located higher for the windshield. Figure 37 also 
illustrates the remarkably accurate surface which can be 
obtained even without viewing the B-spline surface during 


Initial control graph arrangement. 
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Sata case Stugy #3: Freeform Modeling 

The final case study presents an example of freeform 
modeling, in this case of a Stetson hat. In 2b initio 
design, the engineer often has a general idea of the form 
which he or she is trying to achieve, but is not 
constrained by a requirement to exactly match previously 
existing lines. For this reason, no attempt was made to 
compare this model to a preexisting design. 

In the absence of such previous form definition, it 
will often be beneficial for the designer to sketch a few 
basic lines to aid in visualizing the shape and the 
required control graph dimensions. Because of the 
difficulty in visualization of the more abstract form, in 
this particular case it was also Found to be useful to 
model both halves of the object, even though it is 
symmetrical. 

Aside From these initial considerations, the modeling 
approach is basically the same as that in the First two 
case studies. A third order B-spline was used with a 
seven by seven control vertex matrix, based on (form 


considerations which will become apparent as the model 


development is reviewed. A length to width ratio of 1.3 
was selected. Figure 38 presents the initial control 
graph. 


Viewing the planar control graph as being in the 


horizontal plane of the hat’s brim, vertices defining the 





Rice Sex rriaeteleconkrolorapheanGawawStetsen hate. 


Cemtcol graph mews andscolumns rcelccated. 
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Sides of the crown were to require placement ' nearly 
vertically above one another. For this reason, the 
ROW PICK feature was used to relocate rows and columns’ of 
the control graph as shown in figure 39. Notice that the 


second column from the right exhibits the disparity 
between control vertex position and control graph tline 
position which was discussed at the end of section %.3.S. 
When moving the column of control vertices, one increment 
of the movement was distorted during communication between 
the two computers and thus ignored by the hnost computer’s 
program. In all subsequent operations, there will 
continue to be a disparity between the position of these 
vertices as displayed by the PS 300 and as used in the 
preparation of vector lists and calculation of surfaces by 
the host computer. The intersection of the control graph 
lines, and not the individual cubes, marks the vertex 
position upon which the B-spline surface will be based. 
After positioning individual vertices to define the 
rounded shape of the surface edges (figure tO), the 
vertices controlling the surface of the hat’s crown were 
Pulled up from the surface. To achieve uniformity of the 
Similar halves, the points were first selected with the 
Stylus while the control graph was in an orientation 
Similar to that shown in figure 41, then the display was 
rotated to present an edge view (figure te) before the 


selected vertices were moved. Also in the interest of 
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RFlevated vertices define 
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achieving uniformity, the modeling was performed without 
SSeeeh ene clibhattunction, allowing direct comparisons to 
be made between foreground and background lines. Notice 


Pheer eeptm CUeCINg im the fright rear quadrant of figure 41 


which gives the viewer a better perception of the display 


orientation. 





Fig. te, sElevatangestne brainer 

The Final step in forming the control graph was to 
elevate the first and last rows of the control graph to 
achieve the raised brim Cfigure tte). It was possible to 
Go this very easily in the ROW PICK mode, even though 
points in the rows had been moved around to accomplish the 
Seumeannig “ar the edges of the Brim. The entire row of 


vertices could be moved simultaneously without affecting 
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the relative position of the individual vertices in the 


row to each other. 
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Figure t3 presents the Final control graph of the hat 
with the resulting B-spline surface. Notice that while 
the vertices form a relatively rounded brim Cfigure 40), 
the resulting surface has distinct corners (Cfigure 43). 
This effect is due to the fact that only the corner 


vertices of the control graph are interpolated by the 


surface. Since the adjacent vertices are nee 
interpolated, the result is a sharp discontinuity at each 
Goeecie FOUR corners of the contrel graph. In order to 
present the desired smooth boundary, these four vertices 


must be relocated to lie on the intended edge of the 
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surface, rather than ona smooth curve connecting the 
adjacent vertices. 

While the hat perhaps belongs more correctly on 


Huckleberry Finn’s head than on a cowboy '’s, is 


Severtheless dillustreates well the great potential for 
Freeform design with surface B-splines. Pi guce 25 


presents a section view of the same hat and control graph. 





Pig oo einGh Viewsat nat witha control polygon. 





CHAPTER 6 


RECOMMENDATIONS AND CONCLUSIONS 


6.1. Hardware and Firmware Modifications 

several modifications to the hardware and firmware of 
the system upon which SPLINE was developed would 
Significantly enhance’ the program. At this time the 
University OF Washington Mechanical Engineering 
Department’s PDP-11 computer is being replaced by a VAX- 
iy 750 . This replacement makes possible most of the 
enhancements discussed below. 

Saree. ns High-speed interface. It was initially 
planned that SPLINE would make use of rubber sheeting, the 
real-time modification of the B-spline Surface display in 
response to control vertex manipulations. However, Pe 
soon became apparent that communication between the two 
computers, at S600 baud, was far too slow to effect real- 
time response. 

Rogers and Satterfield C173 found calculation of the 
Full B-spline algorithm too slow to allow surface dragging 
or rubber sheeting, so developed an abbreviated algorithm 
which took into effect the localized effect of a single 
control vertex movement. Using the present system, even 
the time for a full B-spline surface calculation was found 
to be insignificant compared to the time required to 


communicate a new vector list, however calculated, to the 
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PowsO0:. It takes approximately ten seconds for the host 
computer to send the vector list for the B-spline surface. 

The PS 300 manual C20] states, "This interface is 
best suited for infrequent communication of small amounts 
of data.” The interface simply is not designed to support 
a program such as SPLINE. Upgrading the system with Evans 
and Sutherland’s 56 kilobaud high-speed interface would 
provide a distinct improvement in the program operation. 

Sri ee. VAX host computer. The greatest potential 
benefit of interfacing the PS 300 with the newly installed 
VAX computer is avoidance of the PDP-11 operating system 
discrepancies. It is expected that SPLINE would require 
Few modifications to compile on the VAX system. 

See Graphics Support Routines. 4 totally 
different host-resident communications software package is 
available for the PS 300 on VAX systems than 1S used on 
epee OP—11. The Graphics Support Routines provide 
Slgnificantly more reliable communications between the 
host computer and the PS 300. Additionally, these 
routines perform some preprocessing of data in the host 
CPU, resulting in substantially faster communications. 
Upgrading the system with the Graphics Support Routines 
would require some revision of the manner in which SPLINE 
presents data for communication to the PS 300, but would 


provide a worthwhile enhancement. 





noe 
6.ec. Program Expansions 

SPLINE was designed to support many features which 
are not yet Fully implemented. For many of these 
Features, the PS 300-resident portion of the program 
already includes the necessary statements to handle 
display and selection of the additional options. The 
programs are carefully documented to facilitate expansion. 

Swe)’, Input/output menu selections. The first 
Peegram expansion which sheuld be investigated is the 
implementation of all input/output menu selections. At 
the present time the function key presses are reported to 
the FORTRAN subroutine, Lar However only a shell of the 
subroutine exists and is totally nonfunctional. 

The most needed output ability is that to print the 
Final control vertex positions on disk or paper. The 
primary purpose of the program is actually to obtain such 
a listing, the control vertex positions being an integral 


Part of the B-spline algorithm which defines the modeled 


surface. Such a listing should include the order of the 
surface, the homogeneous coordinates, and the knot 
vectors. These Values are readily available and 


identified within SPLINE.FIN Cthe FORTRAN portion of 
SPLINE} and interfacing with the printer should be 
relatively straightforward. 

The variable, KEY, in subroutine IQ is equal to the 


number of the function key which was pressed. 
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The next input/output menu Functions which need to be 
implemented are the saving to disk and loading from disk 
OF control vertex positions, allowing work in progress to 


be saved and restarted later at the point from which it 


was saved. This task will be very similar to that of 
implementing the print Function, except that some effort 
may be required to avoid having SEMEroL vertex 


manipulations for the currently displayed model apply to a 
new set of vertices when loaded From a disk file. 


The most difficult input/output menu option eo 


implement may be the plot function, intended as a screen 
dump. While the host program is aware of Current vertex 
locations relative to one another, Pees snot aLtmMLormed fer 


rotations, scaling, global translations, and clipping 


which are performed by the PS 300. Even if this 
information were communicated to the FORTRAN program, the 
programming required ED accomplish the matrix 


transformations in the host-resident program would be 
sobering. The PS 300 programming language has a Function 
called XFORMDATA, however, which retrieves the transformed 
data for an object as ASCII data For transmission to the 
host computer. Using this function, it should be possible 
to implement a screen dump Function without excessive 
Geert 1 CUA EU . 

6.¢€.c. I{nversion algorithm. The time required to 


model a desired surface could be greatly reduce with the 
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implementation of an inversion algorithm. Ssuwcn an 
algorithm would calculate an initial set of control vertex 
positions, the required surface order, the homogeneous 
coordinates and the knot vectors which would yield a B- 
spline surface approximating the surface represented by 
data in the known-sSurface data file. The program would 
branch to such a Subroutine almost immediately after 
program execution, from subroutine INITCP. 

Because the B-spline surface does not interpolate the 
control vertices, developing and implementing a suitable 
inversion procedure is not ae # trivial task. Two- 
dimensional approaches to the problem are presented by 


Yamaguchi (CeSJ] and Wu, Abel, and Greenberg Celjd. A more 


complex Chait more immediately applicable) three- 
dimensional algorithm is presented by Barsky and 
Greenberg (l1e,e6l. Rogers, Satterfield, and Rodriguez 


offer yet another three-dimensional approach (£6,171), which 


they describe as "conceptually Simpler, but 
computationally less efficient” than Barsky and 
Greenberg’s. They offer as justification a reminder that 


the inversion algorithm is used only once during the 
Heoccam, EO obtain an initial approximation. Tiller (£18) 
presents some thoughts relevant to approximating surfaces 
with nonuniform rational B-splines. 

It should not be assumed that an inversion algorithm 


Will render interactive modeling obsolete. The algorithm 
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offered by Rogers, Satterfield, and Rodriguez, for 
example, does not automatically create hard chines, which 
must then be added interactively. Even if an inversion 


algorithm was capable of yielding a B-spline surface which 
exactly interpolated the known surface data, some 
interactive manipulation would be required to make _ the 
surface suitable. Digitized data from a sculpted surface 
1s almost never Fair, having small oscillations due to the 
digitization process. These oscillations must be removed 
either by extensive and difficult preprocessing of the 
data or through interactive manipulation. 

6.2.3. Circular arcs. Consideration of Tiller’s work 
with the representation of circular arcs By nonuniform 
rational B-splines suggests an additional feature useful 
during interactive modeling. With a suitable inversion 
algorithm, the user could place several control vertices 
under program control, identify three points on a desired 
Circular arc, and allow the program to relocate the 
vertices to yield a circular arc interpolating the three 
points. Since the manipulation of homogeneous coordinates 
and of nonuniform knot spacing is not highly intuitive, 
such an approach is necessary in order to make use of the 
power of the nonuniform rational B-spline. 

B.2.4%. Orthogonal plane intersection mapping. The 
parametric representation of the surface presented by 


SPLINE is adequate for accurate visualization of the B- 
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spline surface. For some applications, however, a more 
traditional representation of waterlines, buttocks lines, 
and transverse sections is desirable. in’ order, to 
implement such a display, it is necessary to map the 


intersection of the B-spline surface with the three basic 
orthogonal planes. 

iPne to GOU-Fresident portion of SPLINE, SEEINE . UAT ; 
already has the necessary structure to display the three 
intersection maps. SPLINE.FIN would have to present the 
vector lists to the PS 300 with a command of the format: 

Moa VPCIORIEIST LTBI ZEDAN= . 
The vector list would be followed by the sending of an 
appropriate value to the PS 300 program variable, xXYMOQODE, 
and the sending of a triggering message to input number 
eme Of NEW MODE. The communication of control graph 
vector lists in subroutine CPLINE provides a similar 
example. 

Calculation of the vector list should be implemented 
in subroutine PLANES, which is currently called from 
subroutine WAIT when the appropriate function key is 
pressed. 

Mapping of the intersection between the planes and 
the B-spline surface can be difficult, especially when 
trying to obtain sufficient accuracy for an adequate 
display. Multiple disconnected contours, such as contours 


of adjacent peaks, present a particular problem. 
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Heap eae presents three algorithms For the 


production of contour maps of a Function defined at the 


vertices of an irregular triangular mesh. such a mesh is 
often used in Finite element techniques, particularly for 
the solution of partial differential equations. Heap’s 


algorithm First creates the triangular mesh, with vertices 
oF the mesh lying on the surface to be mapped. The 


algorithm then Follows the contour from element to element 


oF the mesh. Since straight lines are generated through 
each mesh element, a very Fine mesh is required for an 
accurate contour, consuming large amounts of memory. 


SPLINE already approaches the memory limit of the PODP- 
rr. 

Satterfield and Rogers (28)] suggest using Heap’s 
algorithm to obtain a triangular mesh along the path of 
the contour, but then present a variation. They use the 
triangular mesh as a basis for piecewise B-spline 
Calculation of the surface in the region of the mesh. 
Pairs of surface points separated by a desired tolerance 
are generated on the B-spline surface and checked for 
spanning of the contour. When they are Found to span the 
contour, a more exact contour location is determined by 
interpolating between the two spanning points. This 
procedure handles properly the problems of correctly 
ordering the points of a contour and 0of multiple 


disconnected contours ina single contour plane. 
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6.2.5. Reflection about a plane. Like the orthogonal 
plane intersection mapping, display of a reflection of the 
model about a plane has been fully implemented in 
SPLINE.DAT, but remains to be implemented in SPLINE.FIN. 
Calculation of the vector list would be trivial, requiring 
only that an offset be added to or deducted from the 
appropriate vector information already held in memory. 
Communication of the vector information would be similar 
to that detailed in section &.2.4, above. Pressing the 
appropriate function key already activates a call to 
Bear OucCiImne REFLECT. 

pac. OF Calculation of Form parameters. ene 
mathematical nature of the surface representation could be 
made even more useful with automatic calculation of form 
parameters, such as center of gravity, section areas, or 
waterplane area. No provision has been made in SPLINE at 
this time for such a feature. Cruetz2 and Schubert (C29) 
Cake this approach one step Further yet. They propose 
allowing the designer to specify initial form parameters, 
such as a section area curve, Block coefficient, and beam 
to draft ratio, and letting the computer program generate 
From that an initial body plan. 
6.3. Conclusions 

SPLINE has demonstrated the tremendous’ potential 
which exists for mathematical definition of sculptured 


Surfaces coupled with highly interactive computer 
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Graphics. Dramatic changes in the efficiency with which 
automobile bodies, aircraft fFuselages, and ship nulls are 
designed and manufactured can be expected in the very near 
Future. Using B-splines, Or similar mathematical 
representations, the definition of a complex sculptured 
surface will take hours, not days. Modifications to a 
developed surface will be accomplished in mere minutes, no 
longer requiring the designer to essentially start over 
with calculations and fairing of lines. 
Not only will surface definitions be achieved more 
accurately and efficiently, but those definitions will be 
Girectliy interfaced with computer programs which will 


evaluate the performance characteristics of the form and 


with the machinery which will manufacture it. Further 
effort in the development of accurate inversion 
algorithms, ga user/computer interfacing, and im 


Generation of form parameters From surface definitions 


Will be particularly important. 
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APPENDIX A 


FLOW CHARTS AND FUNCTION NETWORKS 


The figures contained in this appendix present Flow 
SaGeES ens FunGEIiOon metworks for the major program 
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and SPLINE.DAT Cthe PS 300-resident program). The program 
listings are given in appendices 8B and C. The comments 
contained in those listings will be particularly useful in 
understanding the Function networks. Those who are 
unfamiliar with the PS 300 programming language will want 
to consult the computer manual CeOld For an explanation of 
display trees and Function networking amd for details 


SemMeerming the individual Function blocks. 
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UMNET CKD +10 
LES Ckeoeners UKNOTCK) .="UMAX 


CONTINUE 





Led 


BOR LEC Kk ** 8), NEP+NORDER 
Cech wee NORE Jew KNOT CK i s-F 0.0 
[meek olLwNOROER. ANG. -LESNEP) WRNOTCK) = 
a WKNOTCK-1)+1.0 
Pree ts). NEP I SwReNGic kK 7 SsaunAXx 
160 CONTINUE 


“umeee Determine parametric spacing Of displayed B-spline 
eee SUrFace net lines. 


Br NE == UNAx/30.0 
WINC = WMNAX/30.0 


BEScOCen TF 1. a1 
eke = CREAECK S22 Seine 
Wick = (REESE Che Swine 
200 CONTINUE 


“uuue Determine First order basis Functions. 


DO 250 M = 1,MCP+MORDER-1 
pO 240 K = 1,31 
IF CUKNOTCM) .LE.UCK).AND.UCK) .LT.UKNOTCM+1)) 
+ THEN 
RCM,1,K) = 1.0 
ELSEIF CUKNOTCM).EQ.UCK)) THEN 
RCM,1,K) =#1.0 
ELSEIF (K.EQ.31.AND.M.EQ.MCP) THEN 
R(M,1,K) = 1.0 
ELSE 
R(M,1,K) = 0.0 
ENDIF 
240 CONTINUE 
250 CONTINUE 


Deve 7O Newel, NEP*NUORZER-1 
BEGeSO Ke=_ 3) 
IFCWKNOTCNI.LE.WCK) .AND.WCK).LT.WKNOTCN+1)9 
7 THEN 
SUNe ak) =, © 
ELSEIF CWKNOTCN).EQ.WCK)I) THEN 
SGN = 
ELSEIF CK.EQ.31.AND.N.EQ.NCP) THEN 
SCN ie oe =e 
EESE 
SCN. 1, K2*,.=90.0 
ENDIF 
260 CONTINUE 
=7 0 CONTINUE 





aie 


saeee Calculate higher order basis Functions. 


DO 350 K = 2,MORDER 


Dee Ss2Oatt = ae tnORDER-K 
Be S305 l= 1esl 


A = UKNOTCM+K-1) —- UKNOTCM) 
Te Gea oOo eden 
Bo O-o 
EESe 
Beas Celelo-=OKNOt Ciera k=l La7A 
ENDIF 


C = UKNOTCM+K) - UKNOTCMN+1) 
TP Ce ee Ornoo) THEN 


H«= 0.0 
ELSE 
D=(UKNOTCM+K)-UCI))*ROM+1,K-1,19/C 
ENDIF 
290 RCM,K,I) = B+ OD 
330 CONTINUE 
340 CONTINUE 


B50 CONTINUE 


Bet oO =. ¢ 7NORDER 
Too.) NOS i NEP NORBER-K 
1 (eet SO) ee ele ea 


A = WKNOTCN+K-1) - WKNOTCN) 
LR Ace 2G 0.0)) THEN 


Boo oee 
EESe 
Be Cu Ge whence Sch. K-11. 107A 
ENE 
BEO Ge= VhNOTGN hos] UKRNOTCN+ 13 
PP Ce ea0.0) ~fHEN 
8) A * (3) (8) 
ELCSE 
B=CUKNORGNTR Uw GhIo@ SCN i K-)) Love 
ENDIF 
30 SCN AK hs (Bo 0 
30 CONTINUE 
tO CONTINUE 


nO CONTINUE 








13 


“ewee Calculate the surface coordinates. 


760 
770 
750 
Za 
800 


tM Mt 


tM Me et 


+++ +4 


po goo I = 1,McP 
po 790 J = 1,NCP 
po 780 L = 1,31 
IF CRCI,MORDER,L).EQ.0.0) GOTO 780 
DO 770 MN = 1,31 
IFCSCJ,NORDER,M).EQ.0.0) GOTO 770 
nO 760 K = 1,3 
SURFCK,L,M) = SURFCK,L,M) + 


CPCI,J,K) * 
CPCI,J,4) * 
RCI,MORDER,L)* 
SCJ,NORDER,M) 
CONTINUE 
CONTINUE 
CONTINUE 
CONTINUE 
CONTINUE 


Send the surface coordinates to the PS-300o. 
CALL SURFAC 

Stop Blinking "B-SPLINE” label on keyboard. 
Bole PSoeEND tCe5, SEND rPRLSE TG <e>FLABELe; 2) 
Gael PSSEND Cee, SEND 1,70 <1>NEW MODE; * 2 


RETURN 
END 





et 


He He He ie He ME HG AE Ne HE HE HE HE OE he OE EE He HE He Oe Ee OE AE HE HG UE Oe HE AE NG AE HE OE HE He NE Be HE NE OE OE ME NE RE AG RE OE HE HE EE He NE he 
He He ee HE He HE Ne He HE He Be NE NG he HE NE ME Oe Oe AE AG ie AE ME AN AE Ne she AE HE AE A HG AE ME HE AG Oe AE AG HE NE AG AE He HE i NE he aE ee ae EG HE ht 
We WE HG He HG Ae NG NE HG He HG ae He NG he HE he HE he ae Subroutine CPLINE We He WE He HE ME NG AG ME AE HG Be ME 2h EE AE He he HE 
He HE HE AE Ne ee ie HE ae NE ae ie AE AE AG AE AE AG AE AE ME HG ME HE HE A AE ae Ae ME he He AE HE HE HG HE AE he HE ae He Ee EE He HG AE GE NE he he he NE ate 
We WG WE He He HG he Be Be NE Be ae ME HG HG HE He AG NE NE HE HE NE Ne HE NE BE ae Oe Ae Ae Ae HE AE NE NE HE NE NE HE HE he AE he NE NE ae NE NE he NE NE aE NE le ae 


Sd 5d 
ji mput wwer NEP GCPC1o.8,4) = 
*Output eVeEeaCsOGo, EPCasa0,  Cvector list defining oe 
™ lines connecting vertices) ~ 
*Calls POP SSseNnbe PSVEES - 
“Alters Pore on teschutcure: CP LINES” - 
“Description: This subroutine prepares in the VECS array a* 
- vector list defining the lines connecting * 
= the B-spline vertices Ccontrol points). The* 
ae vector list is then passed to the PS-300. - 
“Created On: 12/03/86 Neale ied Gr: = 
5d * 


We He He he HE He HG Ne HG HE HG NE AG NE UE NE He HE Ae he AE he A HG Be HE AE NE he NE HE AE He he HE OG RE IE AE eG ae NE he OE he NE NE HE GE he EE EE EE 


“Variable Type Explanation ‘si 
tame eeewewe w= S82 eee ewe Ss ew ee ew ee eee ee cg 


*BUFFERCS80) Logical Holds a message for transmital to the* 
€ 


Ps-SsOO,oGCgran wien che PSSEND ™ 
“9 library subroutine. a 
oeeelO.8,t) Real Holds the xX,Y,2 coordinates for each * 
~ of the control points (vertices). = 
- Subscripts denote row, column of a 
“es vertex and X,Y,2 or homogeneous " 
= component. “ 
Mu} Integer Indicates the X,Y, or 2 component of * 
x the vertex vector is under = 
- consideration. = 
alee Integer Counter indicates the current array * 
‘a element of LP. = 
=TOSTAT Integer Input/output error status. = 
SLUEC Integer Counter indicates the current array * 
- element of VECS. = 
pier ¢ 333) Logical .TRUE. indicates corresponding = 
~ elements of VECS represent a line = 
a vector Cdraw to this point with pen * 
eownm. . »-FALSE. indicates = 
- corresponding elements of VECS be 
il represent a point vector Cmove to - 
= this point with pen up). - 
it Integer Row of vertices under consideration. * 
“| OO Integer Number of rows of vertices in the * 
- B-spline control polygon. = 
mN Integer Column of vertices. = 
2NCP Integer Number of columns of vertices in the * 
= B-soline eenecol polugen. = 
*UECSCSO0O) Real Vector list defining the lines ~ 
al connecting the B-spline vertices. vy! 


Ae Me He AG ME AG He HE NE AE HE Ae HE HE ME HE BE HE HE He ME HE NG He AE He HE NE he NE He BE He BE OG NE OE HE He ae He NE he HE ee ME OG NE he NE ae NG he He aE EE He NE 





LS 
SUBROUTINE CPLINE 


EoigagiNe 7 VPES/  VEESC 1000) 

EGGiGAL EPC333) 

ESMG\ resale; IEP NEP CPC1lO, 8,4), MORDER, NORDER 
LOGTEAES | SUPFERCeEC? 


IIEe=© 
Pea 


“eee Usoctor list For lines along rows of vertices. 


DO 100 m=1,MCP 
DO 390 N=1,NCP 


* Count the vectors created. 

LEP=ITEP+L 

HO 60 1#1,3 
“2 Count the vector components (X,Y,2) 
a created. 


[VEG RU ee +1 
VEESGIVEGIS= EPChi N12) 
BO CONTINUE 


ooo = Indicate whether vector is point or line vector. 


PRICIER = -eRie. 
he CNBEG 3 Sbrerry = -. FALSE. 


316) CONTINUE 
100 CONTINUE 


eeeee Usector list For lines along columns of vertices. 


Boece Ni NEP 
BE hoe a lie elite 
DEP te eee 
Bega eOsr=2. 3 
PURC Se Ube ead 
VECSCIVEG) = CP Chr, N,. 1) 
160 CONTINUE 


foes =* Indicate whether vector is point or line vector. 


EP GVER? = TRUE. 
Pewcit eGo eC rer?) *= er ALSE. 


ESO CONTINUE 
2ue CONT INUE 





io 


ewer Seng vector list to PS-300 pregram te define 
pow ee SpSsteeucture E€PE of structure CP _ LINES. 


210 


PNGOBE —¢31,eR0, BUPFER) ILP 

Bnet ieee nein I Sl TIEMI ZED N=’ , 13) 
ERE. PFooeND C31 SUFFER 
Spr reverses (or VUPES LP. .ITRUE., 1OSTAT) 


RETURN 
END 





TS 


Me We Me GG ee NG AE AE A EG GE GE GG GG GG GG 


ee Me Me Me Me EG GG EG GE EE A EE ee ee 


Me Me He Me Me Me MG GG GG Ne ee Ge ee et 


Subroutine INITCP * #6 tt ie ie te te ie te te te me ie te te ee 


We HE ME EG ME NE GE EG GE GG ee EG GG GE EG GE EG GE GG Ge Ge GG GE 
Me HE Me NG Me NG Ge Ne Ne NG ee eG eG GE GG GG GG GG NE EG GE GG GE ee ee 


* _ 
mlmout weno vonwmee , NEP a 
*Output met GC Loe to ae 
*Calls >: PSSEND, INVERT, BLANK, PREPS < 
“Alters PeceliNe . BAT = 
“Description: This subroutine determines an initial set - 
“2 OF control points Cvertices) and passes ~ 
~ commands to the PS-300 which create the = 
= associated display tree branches. x 
pereated On : 11/14/86 Modified On: me 
* ™% 


ee Me Me GG Ge Ne NG AE eG AE GG AE GG EG NG AE AE AE AE AE GG AE EG ee AE GE AE A  e E 


Sd 
*Variable Type 


*ANSWERC1) Char 
werciO,8,4t) Real 


* 

* 

* 

*Dn Real 

* 

*DN Rea 

* 

ShcP integer 
* 

”% 

SOR DER integer 
* 

*NCP ceo eo 
* 

sd 

*NORDER Dabeges 
* 

*NUMNCP integer 
* 

* 

™% 

iver LO Real 

7% 

metilN Real 

* 

* 


Explanation 

Retrieves CYJes and CNjJO answers. 
Holds the X,Y,2@ coordinates for each 
oF the control points Cvertices). 
Subscripts denote row, column of 
vertex and X,Y,2@ or homogeneous 
component. 

The X increment between initial 
control point positions. 

The Y increment between initial 
control point positions. 

The number of control points in the 
ag Geecelonelmiche ianlclial contrcel 
point matrix. 

The order of the B-spline surface in 
the longitudinal Cud direction. 

The number of control points in the 
ro oadiGeceran in the initial control 
PORE Maer 1x. 

The order of the B-spline surface in 
the transverse Cw) direction. 

The identifying number of the control 
point under consideration, 1 -- 8O, 
tierceepolmimGl, 1) iSs@le C1,2) is 2, 
oe, Glog) 15.80. 

The length to width ratio of the 
iilelal camera. Palme matrix. 

The minimum Y coordinate of the 
Pniilolal COmMtco: sOlnt matrix. 


* &€& ke kek Fk eke Ee FE EKER EK ek ERE Rk RE KEE RE KR EOF 


Me We He We We Ne Me AE ee Ge We Ne AE AE We AE AG AE A AG AE AEE RE GG Oe Ok AG AE A RE AEE AE GG RE GE Ee 





He He te Mt 
We he Me Me Me 


ZO 


te te He ie te 
He he te he Me 


100 


He He He Me 
Wt te ht te 


200 
201 


E10 


220 


e230 


oes 
SEeroe mene INC TCP 
PVN omer Aner sn NeR = CPClO°8,59, MORDER, NORDER 
ERARAGt ERS. ANSUEK 
PESTER SUPPER cCso3 


Determine whether it is desired to display a known 
surface. 


TY PESO 
FORMATC///,’ Oo you wish to display a known ’ 
# ’surface From a PREPS-format file?’,/, 
at ’ Please answer CY) or (N3I.’,/3 


REABCS, /0,EKRSS50) ANSWER 
FORMAT CA1) 
DEaemINSWEK bal «veo s GOtG. 100 
PE eCANSUER. £Glen- ) GHlo. coe 
GOTO SO 


Allow input of coordinates of points on a known 
surface from a PREPS-format file. 


EAL Seve ss 


Establish size and length/width ratio of initial 
Cemenr@Ol pGImt matrix. 


ye eo 
FORMATC//’ A matrix of are Hoe Ee GO xX 89%; 
* may be selected. 
ENTER THE DESIRED oo SIZE. 
’  CNumber of transverse, ainsi — 
* stations.)’,/, 
' YExamole: 7,57 ,7) 


t+++++ 


READ (S,*,ERR=200) MCP,NCP 
IF CMCP.GT.10.OR.NCP.GT.8) THEN 


iy re eceO 
FORMAT C/,’ The maximum value for the’, 
st ide ixn1s 10,8. 7, 
* ’ ENTER BOTH VALUES AGAIN. ’) 
GOte teas 
BESET Ee wellor ,e booth. Nore el. 5S) THEN 
fiyYebEe3s0 
FORMAT ¢€/,’ The minimum value for the’, 
t eee eS oy os 7, 
+ > ENTER BOTH VALUES AGAIN. ’) 
GOTG)210 


ENDIF 





133 


eos ieee tO 
eto BOrMealC/7/,° Enter the desired length/width ’,/, 
ste Gatve tGeeseme Vereices matrix.’ ,/3) 


READ (S,*,ERR=235) RATIO 
IF CRATIO.LE.O) THEN 


hee so 
E50 PObmonG7  wetme el ENGTH/WIDTH RATIO MUST’, 
t eee est LOR 3) 
See. e 3S 
ENDIF 


“*4ueme Determine the order of the B-spline surface equation. 


tyre. ces 
eps FORMAT 3677 Semeecnecmevesees GF the B-spline’ ,/, 
+ SSupeceeet neemerronoicudinal direction.’ ) 
=70 Py Pe aes 
a7 5 FORMAT C’ Use integer values of 3 or 4.’) 


Roe ECS) = ere me Co OP BER 
Pe “ChebRB Ere eo) 2S er ORBER- GI .4) 6016 270 
ire eso 
eu0 PORMelwt//. SEReeG the GEaer of the B-spline’, 
ae > surface in the transverse direction.’) 
ees ieee 7s 
Renpeos,~, ERR®ee5) NEORBER 
PP SONGREER LT  Ss.0k .NGREBEB- 60-4) GOIG ces 


/, 


#e#eeEM Calculate the coordinates of the initial vertices 
oon e motrix. 


Vee MM Determine the X and Y spacing of the vertices. 


Bhi OP LOA! CMGE=1> 
Pes CNGR Beryl) THEN 
EN=6 70 
EESo 
BN=1 707 Chal tO PLOatT CNER=1 3) 
BNEIE 


SK aKateee Calculate the coordinates. 
YMNIN = 0.0-1.0/CRATIO*e .O) 


Does o he ieee 
EG e300 N= NEP 
CPChA Me ) sO Sacer am. Cii-l) * DM 
Cech N 2. Vite Neenee ee N=) ) * DN 
GPC. M.S) eG 
Creche. 494% 17.6 
a Default homogeneous coordinate = 1 for 
* Menscetionel B-spline. 





ie 


00 CONTINUE 
310 CONTINUE 


*eeee Send the necessary program lines to the PS-300 to 
a2 = Gispliay the vertices correctly positioned. 


500 CONTINUE 


De YOO UN = 1, HEP 
Bey e320 N« NEP 
NOME? Sle te cN= toed © 


Pee ES G50 7500, coer ek? “NENEP, NUNCP 
10 eC een Sil N SiRUCTURE SET’, 
7 eee lec PNG e BENT EP heRECR: le, 3" 3 
CALL BLANKCS, BUFFER) 
CALL BLANKC4S, BUFFER) 
EAL PSsr Nese bUrEER? 


Ebb essehiieGeo wa hON T= TRANSLATE BY 0,0,0; 7) 
Cee eso PON ower t Net oNee OF CUBE; ’) 
Cale Screws. ENE STRUCTURE; ’ 2 


Pee Cen seeyoureeR? NUMER 
S20 PORMGt = G rane Stoke ley WF: ° 
cs SSSeenulnle. 3 
CALL BLANKC1le, BUFFER) 
SAE ee Sst Ne oee omit rk. 


ENCODE €38,530,BUFFER) NUMCP,NUMCP 
530 FORMAT c’CONNECT TRAN TOTAL_’, I2, 
+ <1 <1CR 12° TRAN: *) 
CALL BLANK(C20, BUFFER) 
CALL BLANK(C31, BUFFER) 
CALL PSSEND (C38, BUFFER) 


PNGORESGse voce pou men ee Cae Ne Lo CPC N, ©), 


+ CPCM,N,3), NUMCP 
S40 FORMAT C’SEND UC’,F7.4,’,’,F7.4,’,’, 
+ F7.4,°) TO <2>TRAN TOTAL_’,12,’;7) 


CALL BLANKCSO, BUFFER) 
CALLED PSSeNE ese secur eek 2 


ENCODE ¢€34,S4S,BUFFER) NUMCP 
S45 FORMAT c’SEND UcO,0,0) TO’, 
+ Mob iealnanaL °.1e.”. 2) 
CALL BLANK(32, BUFFER) 
CALL PSSENDC34, BUFFER) 





S\5) 8. 


S15) 8) 


at 


ENEOR ECCS SsO, SUFFER) NUMNCP 
PORVAmeC SEND wa TO <4>TRAN_ TOTAL...’ ,!e, 
en 
CALL BLANK C26, BUFFERD 
SAbEe ; SSENECee ,oerrER? 


ENCODE (41,S560,BUFFER) NUMCP,NUMCP 
FORMAT C’CONNECT SWITCH PICK<’, Ie, 
'>:<1>TRAN TOTAL ’,12,’;°) 
CALL BLANK (21, BUFFER) 
CALL BLANK (39, BUFFER) 
CALL PSSEND C41, BUFFER? 


fe Connect the dial signal to the switch outputs for row 
faces ane COlUMmm MOVEMEREt . 


B20 
700 


701 


+++ +4 


PNeOtr Gt, 2cOysurmen oheG, NUNEP 
Cob BeONNwec oo SURFER? 
EAC Rose a eee burr ER? 


PVCOOD et aoe our PER N+tI0., NUMNCP 
EALL BLANK (39,,BUPFER) 
EAaLL PesbNee ct! , BUFFER) 


CONT INUE 
CONT INUE 
TYPE 702 
FORMATC/, ’ saliaaliaaheatheatiaatiastienteahestesienteaieaieshehesiesieniesieaiesheiasiesiaieieheeieaieieieieiiaiallll 

Ly PRESS <SHIFT-LINE/LOCAL> ciel 
(ee EN THE S—S0CG KEY BEARD —— 
{= FOLLOWED BY <TERM. me 
i ed Me He Ae ee Ae le Ae Ae NG AE NE AE AE she ake he AE he NE ENG EE ale AE ENE ie HE he te he ake ie he ae? 
LISS 

RETURN 


END 





ie 


We A Ae Ae ie We ie NE A he Ne i he i Ae i Ne NE hee UG I Oe UE ie Ie a OE AE Oe NE i the IE ae i he ee EE OE ae he he ee ee EE ie ee NE te ie a 
eee eee EEE EE EERE RE EEE EERE EERE SPEER ERE REET ERT EP ETT PPP PPT TE SS 
We ee Ae AE ae AE ie Ne A Ne Ne i Ne ie ie EE ee Subroutine INITPS Whe he Whe We We WE NE UE UE he WE HE ie EE Ne ee ie he 
he ee ee eee ee ee ee ee ee ee ee PPP PCP EPC TT TTT PTT TPP PTT TTT Pee SF 
eee eee eee eee Ee EEE EE EERE E RET ER ERE EPR PPPS ERE PEE EPP RTT T SET ES SS SE 


* * 
Mut : PS-300 command language program file, - 
* SSoPoINE.. DAT: * 
SO Out >: PS-300 command language file output to - 
* Po=350C2 = 
“Calls Seo seear . Posen , Por. = 
*Alters : = 
“Description: This subroutine sends the PS-300 command ~ 
* language program stored in the PDP-11 disk * 
0 ieee ore INE. Seb. to the PS-300. = 
*Created On : 11/9/66 Modified On: . 
* * 


30e AE Ae AE Ae AE ie ie WE Ne Ne AE Ne Ne Ne ee ie AE Ae AE SAE AE Ne ie Ae he Ne ie NE NG OE OE Oe HE EE OE NE NE he ee Ge he HE OE NE HE ie ee OE EE NE he 


+ % 
Bvariable ee Explanat lem i 
Wee ewe meme me meme eww Ow we we we ew we we ee * 
*BUFFERCB8O) Logical Used to pass each program line to = 
- PS-—300); a 
Se eOUNT Integer Number of characters in program line * 
- currently being read and passed. - 
meoLATC13 Integer Reports error status from PS-300. = 
i + 


We Ue ie He AE Ne ie ee Ne ie ie AE he ee ie ie the NG Ne AE he ie Ne ie ie Ae ie ie Ae he Ee Oe he Ie ie i NE he ie HE ie ie he ie WE HE OE NE Ne ee HE WE EE 


SURRCE INES INI fPS 
DIMENSION ISTATC1) 
BGG REDE or eric ay 
PSlalrci 340 


aa (Mi clialize PS-S00 and set wp link with PDP-11 using 
weeee Library subroutine. The first two parameters set up 
See== Jogicaleunit numbersefor input From and output to the 
uueeeme PS-300. The third parameter indicates whether of not 
**#*#ee the PS-300 is to issue an "”INIT” command. The last 
“eueme tuo parameters indicate the length and name of the 
***ee oarray used to report error status from the PS-300. 


iPvEE Loe 
ae FORMAT ( ° 6 6 6 0 ne ne ne Ne ale Ne ee EE NE Ete le ee EE 
ea /,? “*eeeeMM SETTING UP PS-300 ** Mame? 
. I UAT Toshertcheatethaalesiealesiealeshatesiatesieataiaieiaiediataiaieiataiaiaiaiaiaiaaiaaet a) 


Gl@eeeoBTUPC7, 7, .0TRUE], 1, 1SfAt3 
SCiimeaSeNEC1), “INITIALIZE; * 3 





he ge. 


Zoe Some Gile tO PS-300 one line at a time, using library 
—-™ SODrouUtine . 


SReN CoN wewe, NAWIEMSoPEING DAT: ,TYPe@= OLD’ , ERR#210) 


Eee. aU) 
re0 Reee Gs) SO ee etre eke eeco)  1EGUNT, CBUPFERCI), 
+ pele ICOUNT 2 
iO FORMAT COQ, 132A1) 


Pe CL Cae ole. o EAGER SPSSENBCICOUNT, BUFFER) 
Pe Ni Beata Erde. 

MARK SAL INE-LINE7SO*SO 

ee GG pe) hres 


faS RORMADT BGse wee it mich. se a) 
Le SCENE See sOOe) [YRE@ 36 

Sls FORMAL € sen  t€ give up en me....*) 
Sere lee 


i120 SEOSEC3) 


RETURN 


eeREM Error Routines. 


210 ieee eed 


ait Rohe wer nein er OPENING DISK FILE ’, 
* rSRPL INE. Bal. 3 
COU onxl) Cle lo lAh? 
Glee t0 
ee Ever eek 
ae. FORMATC”’ READ ERROR WHILE TRANSFERRING °’, 
a "DATA FILE. ’) 
CAE PSEXITGlaistak 
GOTO 140 
END 


BOE HE Ae ME AE Ae AE UE AG SE HE Se HE HE OE UE AE UE SE HE UE UE UE Oe UE UE AE IE He UE UE HE EU UE Ue UE UE UE UE HE Ue HE HE OE EE NE EE EE ME Ee EE 
Be ie he We He AE Ae EG Uk Be EE AE UE HE EE SE SE HEE UE HE HE HE UE UE UE JE NG HE UE OE UE UE UE HE UE HE UE UE UE UE Ue UE UE UE UE IE UE UE UE EE Ee HE 
Be We We He AE AE UE UE UE HE UE Ue UE UE UE HE UE UE AE AE UE Uk UG HE OE UE UE UE OE UE UE UE UE UE UE IE UE UE Ue OE UE HE UE UE UE UE UE UE UE Ue UE I Ek EE EE HE 


BH HE We AE AG Ae AE Ae HE Ae HE He UE UE UE UE UE UE UE UE UE EE UE UE UE UE UE UE UE UE Ue UE UE HE UE UE UE UE WE UE HE UE UE UE UE UE UE OE UE UE EE Ee Et 


SUBReUT INE sO CKEX? 


Sees This subroutine Girects all input/output Functions, 
ne based om Che Function Kkeu press reportea in the 
Pee variable “KEY”. 


RETURN 
END 





etek 


We Me ME ME Me ME ME AE ME HE HE HE HE WE HE HE AE HE HE HE AE HE HE HE HE AE HE HE HE HE HE HE HE HE He HE HE HE HE HE HE He AE HE HE He HE HE HE He HE HE HE OE Ee HEE 


He He Me ME ME WE ME ME ME HE HE HE ME ME HE HE HE HE HE HE HE HE HE HE HE HE HE HE HE te HE HE te HE SHE NE HE HE UE HE HE UE HE HE HE HE HE SHE SE SE HE AE NE HE ate HE ae te 


Me We HE WE ME ME HE NE ME HE HE HE HE HE HE te HE HE te kt Subroutine MOVING We HE ME He WE ME HE ME ME HE HE HE HE HE HE HE HE EE 
He ME ME ME WE WE ME HE HE HE NE HE HE HE HE NE HE HE HE HE HE He HE HE AE HE HE HE EE HE HE HE HE HE HE HE Be HE BH HE HE HE HE He EE HE HE Oe SE ONE HE HE HE SE HE oe 


Me We Me Me Me WE NE NE HE ME ME HE ME HE HE HE HE HE HE HE HE HE HE HE HE HE SE te ate SE AE UE BE HE He HE HE OE HE HE HE HE HE HE SHE NE SE HE HE ME HE HE HE HE HE HE He NE 


* 
el mput 
* 


eu Out 
“Calls 
*Alters 
Seescription: 


* * * & & ee KF 


*Created On 
*& 


tere. teSnscrmeee NCP EPC lO 8 3), vecteor from 
PS-300 program indicating vertex movement. 
Uipgated "ERGO. 8, 1) 

PSSEND Srey iner lI NE SeSPOLLE, BSPLIN 

EPC lO; aan 

This subroutine receives vectors from the 

PS-300 program which define vertex movement.* 
The array, CP, is updated to reflect that oa 


** *€ ee 


movement. CPLINE is called to recalculate * 
the vector list for the lines connecting the* 
vertices if the lines are being displayed - 
and the B-spline surface is recalculated ™ 


USing an abbreviated algorithm which takes * 
into account the localized influence of the * 
relocated vertex. * 
e717 7/7 ee Modified On: sas 


e 


HE ME He HE HE ME HE HE NE HE HE HE ME HE ME HE HE HE HE HE HE HE HE HE ME He HE HE HE HE HE HE HE HE He HE HE HE te HE HE HE HE He AE He HE HE HE HE HE HE HE HE HE HE HE EE 


* * 
“Variable Type Explanation 
Meme mmm Ow wwe SO ee ee ee * 
*BUFFERCS80) Logical Used to pass text messages to and = 
- Erom the FS-—s3s00 proegram. = 
*E€PC10,8,¢) Real The coordinates of the vertices, with* 
_ Ene sSUpscaipes 2nGicating row, a 
= column, and X,Y,2 or homogeneous = 
= component. = 
ix Real The X movement of a Selected vertex. * 
“Diy Real The Y movement of a selected vertex. * 
SZ Real The 2 movement of a selected vertex. * 
al BS Integer Indicates the display status of the * 
os B-spline surface. O = not displayed, * 
. lijSiavaciing GOMDinabions of spacing. * 
ne P Integer Indicates the display status of the * 
= vertices. ICP#2 indicates the lines * 
~ connecting the vertices are - 
- displayed. 
*TVEC Integer The position of the picked vector in * 
= the vector list. = 
SEENGIH Integer Byte length of a message returned = 
- PiGsiieaisedtieee Porell or PSREAD. ™ 
aa Integer The row of vertices under = 
a consideration. = 
oll il) OS Integer The number of rows of vertices. = 





fee ee 


*MSG Integer This variable is passed from the - 
- PSS500 program. A value of 1-80 x 
Lg indicates that the vector to be sent * 
= next represents movement of the = 
- correspondingly numbered vertex. = 
“2 Values of 81-SO indicate the vector * 
= represents movement of a row of ” 
* vertices, and values of 931-98 = 
a“ indicate movement of a column of * 
- vertices. Values greater than 100 ” 
~ are used to report the picking of a * 
- row or column of vertices, with the * 
‘g value being the position of the _ 
a VEETCoE Imnmetehe Vector list, offset by * 
= LOG; = 
=N Integer The column of vertices under * 
a consideration. - 
awe P Integer The number of columns of vertices. = 
NUM Integer Indicates which switch position the * 
a PS-300 program should send the * 
* translation dial signals to when a * 
- row Or column of vertices has been = 
> picked for movement. = 
* * 


0G AE EE AE AE AE AE AE EAE A BNE AE EE SE AE BE NG ak he BE Re Ee ae EE AE AE AG AE AE Ek AE ee Be AG Ee EE A EE ee ae EE at NE 


Spee et Ne eOtNe Creer es See ee Ned, BUFFERS 


COMMON /SPLINE/ MCP,NCP,CPC10,8,4),MORDER,NORDER 
LOGICAL*1 BUFFER(S8O) 


weememe TE MSG>100, row or column of vertices has been picked 
umueMM For movement. Compute the appropriate identifying 
foe 6onumber ©S8l-S0 =7rews 1-10; SIi-38) =. columns 1-8) and 
foes Send it to the PS-SO0O program to use in routing the 
fo“ Gial signals. 


ea enict .o0. LOGI ene N 
POUEC s=2)156 = 2006 
TF CIVEC LE Gee Vereen 


~ a vector ina row of vertices was picked 
NOR =SeCrUPeeNGro ie, NErP+taG 
ELSE 
oe a vector ina column of vertices was picked 
NODE eGre ee eee eeNer) /MCP+S30 
ENDIF 
SVNee@e Geo, LOC BURFPERIJ Nun 
100 Be ee ca SEND ee te. 0) 10 <1>PICKED; *) 
Chee ool NE Ces, SURFER) 
Peaurn 


NS 





Pao 


“eeee AO vertex has been moved. 


Pe ChSGret 100) THEN 


Me MM ME Me HEH 
Mh HH HHH HHH 
MM Hh Hh hh Mh HH 
Me Me ME WE HE Me HE ME ME 


e200 


eo] 


20c 


ees 


eO7 


205 


206 


2O7 


eae 


wait for the vector defining the movement 
SAG PokPall Gee, SUrPrFER, LENGTH) 


Decode the message, which is in the form of 
een .1G . Where x, Y, end 2 are in an E10 
fOEMae Lf POSitEive. and an Ell Format if 
negative. 


IF CLENGTH.EQ.34) THEN 
DECODE ¢(34,200,BUFFER) DX,DY,D2 
FORMAT €1X,3C€1X%,E10.4)) 


ELSEIF CLENGTH.EQ.37) THEN 
DECODE (37,201,BUFFER) DX,DY,D2 
FORMAT €1X,3C€1X,E11.4)) 


BeSe LP SGLeNG rea soo HEN 
LF CBerPr ewes) (EQ = 2. HEN 
DEGREE e385, cOc, BUFFER) DX,U0Y,02 
PkieteGen get iat eC lx, E10.4) 2 


PEOE eGo ic Gtr oe Oe). 1 HEN 
Beer cosgees, cSerPeR) OX, DY, 02 
Pore Ge ewee@ct et XP LL. t,1%,810.4) 


BEoE 
DEE ODE GS sre Or SURE Tix, OY, fz 
POM ec Gino tO cts Ix, ELL.) 
ear 
PESEr) ClENGt eo Selene 
Pe CBVe bree ae ee ONG BURPERCIS).E0.° =") 
THEN 


BeCOneeCoo pe OS SUPPER) DX, DY,0z2 
POR RR= Gwe Glee EL) 1x, BELO. 4) 


BLSE TP (BUR ee espera soe EME N 
BPCOREwesee ces, SUPPER? Ox, OY ,02 
BORDER Ge etter elo. 4, IX, Ell. 


Eo 
DECREE NGS6- cor Cerebro DX ,.OY, Oz 
FORMA Ga «, BILOWt eChx, 11.423 
ei 


Bi SE: 
eee COB 
POWietwey, .itx, “VEE lTOR LENGTH OUT OF RANGE’) 
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RETURN 
BEE 


eee ee SMe neividual vertex has been moved. 


eer eeeee Filter out ecccasional erroneous transmissions. 
IF CABSCDX).GE.O.1) DOX=0.0 
Peeroeschy) GE.O.1) Oy+0,0 
bmecAeSChZ>).GE.O.2) B2@0.0 


Tae Gli rete deel tN 
Nee Clo 7 
ie SiS Secs e to Le e110 


CP(M,N,1) = CPCM,N,1) + DX 

CP(M,N,2) = CP(M,N,2) + DY 

CP(M,N,3) = CPCM,N,3) + D2 
ENDIF 


SERRE A row or column af vertices has been moved. 
Pee ehish.sl,38GQ)) THEN 


Pea ChiS6 sek SOF LHe 
~ a row has been moved 
l= S680 
Hove aa Nee 
Geer Nav CPC GN, 1). + BX 
Cee Nemes. Ceo. N, 2) DY 
CeCe) ower ein, 3S) + DZ 
210 CONTINUE 
ENE ie 


+ 


LP CMSs e5 th Soler Hen 
- a column has been moved 
NASw SiG IS.6 
BE vecO saa he 
Crea Newer OM.) + DX 
GPG Neem awe Ci Noe) + BY 
Gech Neslm = wer en N32) + DZ 
eco CONTINUE 
ENDIF 
ENE Ur 


“eee Peport the new B-spline surface and vertices’ 
*##*e** Vectors to the PS-300 only if vertex movement 
eeeEM TS completed, to minimize transmission time. 


Soler SrOoli CeO, BURP ER LENG? 
Peer Notte ae Oo hieN 
te Ore an 2) Cell CeLINE 





igus 


Peles veto unl. Bort iN 


ENDIF 
RETURN 
ENEE 
STOP 
END 


We Me Me ee Me ME ME AE AE Ee Ee AE RE EE EE te Eee EE EE RE Ee EE Ge Ee EE EE 
ME Me Me HE ME ME ME AE AE AE Ae Ne EE AE EE EE ee EE EE Ee EE EE EE EE EE Ee EEE EEE EE le EE EE 
We Me ME ME NE Ne Ee ME Ee EE ee Ee EE Subroutine PLANES We ee Me ME AE Me AE EE EE EE EE 
WE We He HE AE MG NE HE ME HE NE ME AE Re WE AE NE NE AE NE he Re EEE ee te AE Ee Ne EE EE ee EE EE te ee EE EE EE HE 
WE We HE AG AE Ae HE UE ME NE UE NG ate AE HE AE EE AE eG HE EE Ee EE EE te EE Ee EEE EE Ee EE Ee EE Ee EE 


SUBROUTINE PLANESC IPLANE) 


“eee When implemented, this subroutine will calulate and 
ae“ transmit to the FPS-300 the intersection of the 

“aeee B-spline surface with the orthogonal plane specified 
oem Dy LT PLANE. 


RETURN 
END 
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3k Ue ie Ae Ae ie Ne Ae Ne UE Ue HG Ae Re EE Ee I Ue EE Se OE ie EE Ee UE EE Ee EE te 


MAE Ae Be Ae EE Ne OE Oe EE ie UE OE SO OE UE UE ee OE ie ie NE Ok Ne ie ie ie NE Ok Ue EE he he 0G 0G a ie EE ie ie ie UE Oe EE Ee Ee Ee at 
SE He ee Sie he ee ee I NG ie A A A EE Ee a Se ie EE iG Ue Ne ie Ne ie ie IE UE Uk EE UE EE AE OE ee Ee 


Wh We AG Ne Ne UE I Ne OE Ne Se AE Se UE Ne UE UE NE EEE he Ue OE UE EE OE Ee EO ae Oe EE Oe Ee OE OE ee EE OE Ee ee ae 


Sa 


Sinput 
* 


SOucput 
Sd 
eealis 
aancers 


eBescription: 


* * * &E ek eK # & 


“Created By 
*Created On 


* 


PREPS-Format data file defining 

structure to be displayed. 

Fo-200 vector list For display of given 
SeLUuGeuce. 

FooEND, PSUEES, BLANK 

PS=s0082eeoCcran seruccure KLINES. 

This subroutine reads a data File of points 
known to be on the surface or limiting the 
surface to be modeled with the B-spline. 
The data is interpreted in accordance with 
the Format of the program, 
Format is utilized at the University of 
Washington as a standard format for all 
Gigitizeegw@eata ce Des iInpuce to the PS-—300. 


Ease cals 


* * * *€ Fe ee Ee KE RE HR KR HK 


The data is then passed to the PS-300 in wae. 
Form of a vector list for display. 
D. Michael Bryant - 


eo 7 


Modified On: am 


* 


We HG ie ie Me ie ie Me Me Me Ue Ne A ie Ae ie ie ee ie i Ee EE ie Ee i EE Re Ee EE Oe ee he ea ee Ee 


* 


*Uariable 


*BUFFERC80) Logical 


* 
*FILNAM 
Sd 
* 
*I COORD 
* 
5d 
* 
* IGNORE 
5d 
* 


*TOSTAT 
REP 


% 
cd 


el Shri 


* 


* * & # 


Char 


Integer 


Integer 


Integer 
Integer 


Integer 


Explanation 

Contains strings being received from 
Gr sent) tevene FS-400. 

Name of the PREPS-fFormat data file 
containing the data for the Known 
HOMES. 

Coordinate to be held constant for 
Gach repetition of the substructure 
GMereceeusDuNel oe. O=none;: mx; cey; 
j=. 

Dummy variable used to read data from* 
PREPS-facmae file which is met needed™ 
by this program. 

Reports input/output error status. 
Plane about which substructure is toa 
be reflected. O™ none; 1 = Yd; 

Sma 2 Shae e. 

Number of vector components required 
to define the position of stars used 
to represent data points from data 
File on the PS-300 screen. A 
maximum of 1939 points can be so 
labeled, although the structure can 


**e* *€ ee eK eR RK eR KR 


* * &* ek eK F e HR KH KF & 





Se LVEC ishe(eleese 
* 

m 

* 

mer < 1000) Eegical 
* 

* 

*MAXVEC TICeges 
sd 

*NDONE ince ges 
sd 

ane tS Wecger 
* 

ene ise Speeges 
* 

eivol RUC Pace ges 
* 

cd 

sd 

* 

cd 

BRerPEATC1O) Real 

* 

% 

geeee (3000) keal 

cd 

ex SODY hear 

* 

* 

*XNORM Real 

cd 

sd 

ax ERAN Real 

sd 

Br oUDY rea 

m 

me 

*Y TRAN Real 

* 

me OU Y Real 

cd 

mm 

*ZTRAN Real 


cd 


iso) 


EEealn Manu more polncs. 

Identifies the element of VECS which 
contains the 2 vector component of 
the Final vector in the previously 
processed substructure. 
COeatpom OGlmce , C.FALSE.2 ar 
C.TRUE.23 designations for the 
itemized vector list defined by VECS. 
Number of vector components which the* 
Current substructure adds to VECS. = 
Value greater than zero indicates end* 
of data File has been reached. ~ 
Number of points defining the current* 
SUBStructurs. 

Number of repetitions of the sub- 
ScEructwuce EO be constructed. 
Number identifying the current 
portion of the known data being 
processed. Tf0 minimize memory 
consumption, the Known data is split * 
into a number of vector lists rather * 
than a single long one. ™ 
Contains the values of the coordinate* 
specified by ICOORD to be used with * 
repetitions of a substructure. 
Contains the vectors for the vector 
list te be transmitted to the PS-300.* 
Global translation along the X axis 
to be applied to the structure. 
Applied before normalization. 
Noatalizatlieaneeaccan bu whieh all 
vectors in data file are to be 
divided. 

Translation of substructure along the* 
X axis. Applied before normalization.* 
Global translation along the Y axis * 
to be applied to the structure. 
Applied before normalization. 
Translation of substructure along the* 
Y axis. Applied before normalization.* 
Global translation along the 2 axis * 
to be applied to the structure. 
Applied before normalization. 
Translation of substructure along the* 
2axis. Applied before normalization.* 


1 ae 


* * * # Fe K # 


* * * * & 


* 
cd 


Sl 
cd 
ad 
cd 
” 
* 


* 
* 


* 
* 


We We We Me Me Ne Me WE HE Me He HE HE NE ie Ue Ee HE UE NE NE He NE he NE UE HE EG He EE He NE EE Ne Ne HE NE Ee EE EE Ee EE EE ee hE 


SEprOsbiNE PREPS 


Series ees7  VEESCTOe0) 
BTRENSIGN REPEATCIOO 


LEGTESRSEP C333) 





rs 


PeGlEnl*t BUrFFERCHOD 
CHARACTER*80 FILNAM 
NStRUG <5 1 
NDONE = O 


rVUEE 
Lye 
READ 
OPEN 
READ 
READ 
READ 


10 READ 
READ 


Ht Me We Ne Ae Ee ee ie 
ke Wk We EE HE Ne EE 


= ne) 

~ eo NbeR fF LLeE NAME. ’ 

eS oe fF LENA 

FORMAT CABO) 

CoN t=3) NevE= leek tyre= OLD’ , ERR@200) 
Global header. 

C3,*, BRERSa300))}2NORM 

C30 *) ERE=2CCpm Ghibke 

CS. Eh J0OPm Sem Sou y CEORY 


Substructure header and data. 


Cae = oN Seer hase e Ne rs NPTSe, 1COORD 
C3, ~, ERR=200D= 2 TRAN, Y Teen, ZIRAN, [REE 


Ensure the VECS array dimension will not be 
exceeded by reading the substructure data. 


Pence ees Nebo NetSse*3 
be ORE r NEO) The nwe Gls Ma xUEe*2 
PP oC TVEE+MAXVEG. Gi OGOos  2eEN 


PME LE 


We te We Me he Ne NE ie 


Sete soo 


Read substructure data. 


sy Gent TNE 
Ree COO Ra NE to EN 


REAR Gs) = ore roOOe mores Eee! *a—-2).1=1, NPIS) 


Eas 


ENDIF 


Reco sn =, ERae~s200) sCREPEAICT 21-1, NPTSe) 


bee LCMORD NE Le? ITheN 


ee Gs) anne soo CURES CIVEGtT*3—-1),i"1,NPTS) 


ELSe 


Ean ie 


Pegs Seo Omen bet Jae NPT Se) 


Deo lLe@ORh INE 22) wien 


Rend elmer sooo SCURESCITURE+I*3).,[=1 NPIS) 


BESE 


Regt eee] Perseus Grere nt Ol) NPTSe) 





Lc 
ENDIF 


ihMee ’ sWerkingioae. : 
aa eee Construct Substructure repetitions and perform 
ae ee «6ChLhamSlactions and normalization. 


HERO ie=—1 Nese 
Baeee. JS 2 ets 
Le aC SNE Loe 


te Clegeep EO. 1)) THEN 
VE Goel VECtI= 3-2) 


a3 Charen ¢i. + trans ~SbODY I 7/XNORM=0.5 
ESE 
VEGS GLUE e HIS sates 
i CUES See Jaco el eoN+xXBODY 3 / 
+ ANGRM=O). > 
END 


foe COle beh eae kcc? harN 
VERS CIVeC+I*3=1+lL3.= 


a5 CREPEAT CIJ+YIRAN+YBODY)/XNORM 
ErSe 
VEES@IC EET 3=1+L) = 
Me CURES Vee ede 3a.) y ERAN+Y BODY )/XNORM 
Phair 


TF Clee@Gra. EG Sse tneEN 
VECS CUVEE So aS 


7 CREPEATCII+2ZTRAN+ZBODY )/XNORM 
BSE 
VEGSEGIVEEC+I*3S+L).= 
CUBES CIURE TI 23) +21RAN+ZBODY /7XNORM 
ENDIF 


EPC Clie NE tote Beas =. TRUE : 
PG vege? Sea aGl aloe NP St It lVUEC/ Jus FALSE. 


ee CONT INUE 
aC CONT INUE 


fees oe CoMmStcuct substsucture reflections. 


Peer ole Op LHEN 
Be Vom ee) (URC, TURBE+MAaxVEE/e-3, 3 
Ber soe rele 3 
VE@siG@iled SAX VUEC/ euMVEESCI+J) 
aS CONTINUE 
VES Ol See inc eee BUS SC I+ TREFI*C-1.03 
PPC Cl Cia wee Zany St logeeLPCl/Satl.) 
+O Ean EINUE 





153 


END GE 
[VEG = 1UEC + MAXVEC 
Sara 0 

eeeew Ecror statements. 


200 Wie se S elO) FILNAM 


= 10 FORMAL €//, Error oOpeming disk File’,/, 
+ 1X,A2O) 
Sur 
300 Ure CS. 310) FILNAM 
310 RORMAT ©//,° Error reading data From ’,AeO,/, 
+ ’ Ensure File is Formatted correctly.’ ,//3) 
SEHSEC 3) 
Sen 


wuuunwe Define the position of stars to represent up to 199 
oo =* data points. 


400 IF CNSTRUC.EQ.1) THEN 
ISTAR = 199*3 
IF CIVEC.LT.ISTAR) ISTAR = IVEC 
DO 450 I = 3,ISTAR,3 
IF CI-I/10*10.EQ.0) TYPE *,’ Working....’ 
ENCODE (61,410,BUFFER) 1/3,VECSCI-2), 


7 VECSCI-1), VECSCI) 
410 FORMAT (’KPT’,13,’:=TRANSLATE BY ’, 
+ F7.4,°,°,F7.4,°,’,F7.4, 
+ > APPLIED TO STAR;’) 


CALL BLANKC4, BUFFER) 
CALL BLANKCS, BUFFER) 
Boll PSskNeCel. SUPRER?D 
2 o>) 9) CONTINUE 
END LE 


me" Send vector list For partial structure to PS-300. 


PNEG@SE (39, 460,SUFFER) NSIRUC) VEC/S 
260 Ponte Ke eee Ore ton JTTEMIZED N=’ , 14) 
EREL, BEANK=G3, SUFFER) 
Ea@LE PSSERE (33, Sur FER) 
Sollee PSUrGoeet, (URE /2 UBCS LP. URUE., IDSTAl) 


Nene = NetRUGet 1 

IVES 20 

Poona eo 1s SOlo SOO 
Gaiters 





ie 


wueee The end of the data File has been reached. 


S00 ease C32 
Pe CeVEe 5 iO) THEN 


NOGNE se 1 
Stee see 
ENDIF 
600 CENTINEE 
RETURN 


END 
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We WE Me ME HE AE HE HE HE AE HE NE He HE AE He EE EE HE HE AE AE AE EE EE EE EE Ee EE EE EE RE ee EE He ee 
We He Me WE He HE WE HE NE HE HE NE NE He HE HE He HE HE NE He HE EE ate AE he HE he OE OE EE He EE Ee EE ae EE EE ee Ee EE Eee 


We He Me We He ie ME ME NE AE ME HE NE He NE HE NE Ne HE HE Ee AE HE He HE AE AE AE NE he NE HE HE NE he HE AE HE EE Ee Ee Ee EE he Ee Ee Ee EE 


SUS eCwiNE ker eer 


*eenee This subroutine will calculate and display a 
uetaee reflection of the displayed B-spline surface about 
mee = Che body’s XZ plane. 


RETURN 
END 


We He AE ME AE AE HE HE NE AE NE HE HE HE AE He NE NE AE te Ae EE AE EE NE he he AE AE AE Ee HE NE EE EE EE Ee AE EE Ee ae EE 
We We ME He ME AE ME ME AE AE AE HE AE AE NE AEE HE AEE HE AE he Ee AE He AE HE AE AE EE EE EE EE EE ee EE Ee EE EE Ee EE 
WE We WE WE AE AE HE NE He AE NE AE RE AE he HE RE HE EE RE He HE NE AE RE AE Ee AE RE UE HE OE NEE Ee EE EE EE EE EE Ee EE EE EE 
We Me We Me WE HE AE ME ME NE HE NE NE He NE NE NE HE He NE HE HE NE HE NE UE EE AE HE HE SUE HE HE ae HE NE he he He HE He AE NE EE NE te HE BE ONE NE EE a Ee Oe 


*% 

aemout URES E T 

*Output >; PS-300 program lines resetting rotation, 
= translation, and scaling nodes. 

“Calls eo SNE) 

*Alters eso sOO COGS am taahslatiagn. GFQAtation, and 
- scaling accumulators. 


“Description: When triggered by the appropriate function 


* * * € & e Kk eK Re KR KR K KE 


o key, this subroutine resets the translation 
z= accumulator to €0O,0,0), the scaling 

~ accumulator to 1, and the rotation 

i accumulator to the value indicated by 

_ Poort ee COO emia OF. 3=C90,90,0). 
*Created By : D. Michael Bryant 

wercaced On : 12/17/86 Medieicd On: 

* 


He He He He HE HE HE HG AE HE HE HE he HE HE AE NG HE HE HE HE HG HE HE HG AE HE HE HE AE AE HE HE HE HE ME HE AE HE AE EE Ee Ee HE EE Ee EE 
% *% 


“Variable Type Explanation = 
tone ewo ewe SOC ee ee elle ee ee ewe 5d 





LSS 


*“BUFFERCBO) Logical Contains strings being received from * 
* Gl eSenes co “tine FS=30C. - 
Reo Integer Indicates the current value of the ~ 
* three-way rotation resetting toggle. * 
~ Lago 0) mae =esoO,C.O37., 3@=C€390,90,03.: * 
5d ed 


BE MG ME AE UE WE HE RE HE RE HE HE HE UE HE RE EE IE EE UE EE HE UE EE UE HE UE EE RE UE HE UE RE EE EE RE EE EEE EE EEE HEE EEE 


SHbROO INES ee Ser ClReser. 
EUG teA teaser ereeeD 


EAL sone sl  SseNbeUCO,O,C) TE <2>TRAN_TOTAL; °) 
EA besos tec omeore Nes wCOL 0,0) TG <1>ALL.IRAN; *) 


Spee sseNeel Ss  SENDcl 10 <2>SEale > 
fee esse Ss SENBTO Te <1>sbALbe: *) 


IF CIRESET.GT.1) THEN 
CALL PSSENDC22,’SEND SO TO <1>RESET x;’) 
ELSE 
CALL PSSEND(C21,’SEND O TO <1>RESET_X;’) 
ENDIF 


Pe Pe Lee Sey eo. 4) aie 
EACLE PoskNbtea soe eaeaeue) “<a> RESETY; "2 
Bie Se 
Cele ose NY Cate sen sOmnel <VeRESET YY; *) 
BNO F 


RETURN 
END 





TSS 
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We We We We We We Me Me Ne Me HE ME HE He He ME BE Ne ME Ue NE te UE EE ate ME he EE NE AE UE ee ME Ue ie ME te aie ME he he ie ee ee Ue he EE he EE at ie et te 


he We We Me Me Me We We Me he Me Me ME HE he Ne Me le le oe Subroutine SURFALC We We We he WE ie We Me ME He Ne NE He NE ie He NE ole he oe 


We He Me Me Me Me MG Me Ne Ne Me NE Me he i He Ne ee ie AE AE he UE he Ue ie Ue He AE NE Ue UE Ue HE Ne HE UE UE SE UE UE Ne HE Ue NE ae NE AE NE he ake NE att NE ee et it 


He We We he he Me Me ME Me Me ie HE Me ME HE HE Me ae he he NE He Me Me ee HE He Ue he HE HE HE Ue te te ate UE ee We UE Ue HE NE HE te he he ee Ee ale Ee a ke 


* 

=I nput 
SOUt put 
*Calls 
*Alters 


SOescription: 


Fd 
5d 
* 


*Author: 


*Created On 


* 


SURB CS. slat) 
VBeS€S00) er t333) 
PSseNnb PSvecs 
SeGuUEEUSe 
This subroutine extracts a vector list from 
the array variable SURF and passes it to 
the PS-300 for display of the calculated 
B-spline surface. 
D. Michael Bryant 
Eee 4ey, 


-BS liens S00 program. 


Modified Qn: 


* * * * &* *e RH KF KF KR wR OF 


He We We We Me We HE Me He ME HE HE he HE HE HE UE EE HE he Ne he UE he ee HE HE HE he He he Me ME UE ate HE ate UE HE ME ME ake HE UE UE UE NE EE te Ne ate NE ie ie 


ie 
*Uariable 


moUrrFEKCEOS Logical 


* 

* 

*IBS 

* 

* 

*ILP 

* 
*IOSTAT 
*IUECS 


* 


mer C170) 


* * * *F & ® 


*NU 


* 


Integer 


Integer 


Integer 
Integer 


Logical 


Integer 


*SURFC3,31,31) 


5d 
* 
* 
*VECS(500) 
d 
* 
* 


Real 


Real 


* 


Explanation = 
cee eee cee eee comer ef seer cane cee oe * 
Holds a message for transmital to the* 
Ps 300 peecgcam with Ehe PSSEND * 
library subroutine. = 
Indicates status of display of 
B-spline surface: O = not displayed, * 
1 = displayed. x 
Counter indicates the current array * 
element of LP. _ 
Input/output error status. - 
Counter indicates the current array * 
element of VECS. = 
»~TRUE. indicates corresponding ba 
elements of VECS represent a line _ 
vector Cdraw to this point with pen * 
Glew! »~FALSE. indicates 7 
corresponding elements of VECS = 
represent a point vector Cmove to = 
Chis point with pen up). * 
Totalnembes eae Vvectars im the vector*™ 
list for the B-spline surface. * 
The calculated points on the B-spline* 
surface, in cartesian coordinates, as* 
a Function of the parametric = 
coordinates. x 
VYector list defining the parametric * 
lines representing the B-spline = 
surface. ia 
wa 
at 
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Ss, 
SUBROUTINE SURFAC 


LOGICAL LPC333) 

COMMON /VECS/ VECS(1000) 

COMMON /BASIS/ R(13,4,31), SC11,4,31), SURFC3,31,31) 
LOGICAL*1 BUFFER(SO) 


NSrRue =e 
Panameeeie lines meg selon. euginal) direction. 


CONTINUE 
NSdgRUGA=AwNSTRUE Ss 1 
NEE = S20 
IVE See 
Lie Cc 
Mess Nee CNSTRUE=1I*lO+r1 
NED = NSTRUE*1O 
Peco RUGGED. 4) THEN 
NEND = NBEGIN 
NO «se 31 
Ehot F 


DUO 1LCO | =teNBEGIN, NEND 
DO SSOed £717 31 
Count the vectors created. 
De eee) leet 
boy SOS lS 
EGUMEMENS VSStor Components Cx,y,Z). 
LUBCS, = ei Vaes + oi 
VPGS CLUBS) PS aSuRr tk 1..J J 
CONTINUE 
Indicate whether vector is point or line 
VEC ton: 
Pe Gt ero ee Rue 
Pee Gd. She toee) eeee PALSE ; 
CONTINUE 
Gand INE 


GOTO 300 
Parametric lines inw Ctransverse) direction. 


CONTINUE 

NSTRUC = NS@RBE + 1 

NV. 310 

LV EGS =O 

ee ( 

NEEGIN 6% (NSIT RWC~-S)*10+1 
NENG CNS rua 10 





hee 


PaecNSTRUG Beaee. THEN 
NENG? = NBEGIN 
NO es 31 

ENB 


DO 200 J = NBEGIN,NEND 
po i190 I = 1,31 
ILP = ILP + 1 
pO 180 K = 1,3 
IVECS = IVECS + 1 
VECSCIVECS) = SURFCK,I,J) 


noe SENT UNE 

EP CLLRS he cee. 

PP OC) ee oe CI LPP. FALSE. 
io6 CONTINUE 


EO CONTINUE 


300 PONTINGE 
BNEODE Gs) S1C Jur RoR aNotRuG aNU 

Sue) Be pl SS ne eee ieee hot ITEM ZEG New” | 13) 
BAe rosea 3. BUR ER 
Somes Coen oe RUE et OSTAT ) 


TYPE *,’ Working....’ 
IF CNSTRUC.LT.4) GOTO 10 
IF CNSTRUC.LT.8) GOTO 110 


Re cUuRN 
END 
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oe ee ee ee ee ee ee eee eee ee ee ee ee ee ee ee eee ee PTT TET Ee ES 
We We WE Ne NG he NE NE WE NE NE NE he SHE HE ate SHE HE BNE HE HE UE Oe SE UE SUE SE NE HE HE te HE te ate UE ie NE NE Ste Ne NE iE EE Ne ie EE HE NE ate UE UE NE HE NE EE et 
WH AE HE AE HE UE UE NE Ne NE He Ne UE AE NE UE OE NE SUE UE ME ie UE UE te UE UE SE OE UE HE te UE ate he UE RE EE NE he NE Ee UE ie Ee Ne Ne te AE RE et ete 


- 

Sl nput S sie, janes! 

SOUEDUt SVIELIP,LEe] New Leek. LRELET. TRESET,, 
= IXY,IXZ2,1YZ, and PS-300 equivalents 
“Calls easel eae ieee Ole) Niger LCR Ne SP SREAD 
= Pose NG er eee rr olen 

“Alters 


“Description: Awaits signals under the control of the 

PS] 300] pregroanetiieh seporemtunccion key 
presses or the picking of vertices for 
movement. Determines the mode of operation 
dictated by the key presses, updates the 
related variables and informs the PS-300 
program of the changes, and invokes the 
appropriate FORTRAN subroutines for any 
resultant actions. 


* * Fe ee Ee KE Ke HE KF KR KE KR K OF 


a 6% ee ¥ % 





*Created Qn 


* 


*% 


*Variable 


EPoUFFERCSO) 


* 


*IBS 

* 
*ICLIP 
“ICP 


Lies /ee 


coulcat 
Integer 


Integer 


Toa 


MaaGiticawGm: - 

* 

We ME We Me Me Ae ME ME WE Eee EE Ee ee ea 
* 

planation = 
we me oe nw ee oe oe oe oe oe * 
Contains strings being received from * 
OEeSeEReLcOwcne PS-300. - 
Status of B-spline Surface display: * 
O = not displayed, 1 = displayed. * 
Zoe pimaescatus: L=off, e€Foan. = 
Gontro. oO2tgoMm Gisplay status: C™=not* 


* 

% 

*T KNOWN 
od 

* 
*IPICK 
* 

* 


eee SET 


od 
*IRFLCT 
* 

*% 

*IXY 

* 

* 


BEXZ 
err 
ZeeNG TH 


SRoDE 


* * &* * & KR 
—% 
wn 
G) 


* * * *& & # & HF & ® 


Integer 


Integer 


Integer 


Integer 


Integer 


PINES eke 


Integer 
Integer 
Integer 


Integer 


Integer 


displayed, 1l=points displayed, 
C=connecting lines displayed. 

Display status of known surface: 
O=not displayed, l=points displayed, 
C=connecting lines displayed. 

Picking moge indicators’ M*picking 
individual vertices, e=picking rows 
Or cOlumns of vertices. 

RESEt teggle indicator: 1¢x0, YO,20), 
SmOnse oO, ceo., avwerg0, 130,26). 

Seatus Gewadisplay ef reflection of 
B-spline surface about an Xd plane: 
O=not displayed, l=displayed. 

Status of display of intersection of 
B-spline surface with XY orthogonal 
plane Cwaterlines): O=not displayed, 
l=coarse spacing, e=fine spacing. 

See IXY. 

See IXY. 

Length of incoming message from 
PS-300, in bytes. 

Function key availability status: 
l=standard mode, most Functions 
avallable, e=display of reflection or* 
intersection with planes selected, 
interactive mode not available, 
3=interactive mode selected, 
t=input/output menu selected. 
Contains a numeric message from the 
PS-300, as decoded from BUFFER. - 
1-80 indicate next message will be a * 
new vector for the vertex of the same* 
number. 1l101-ec4e indicate next 
message will be new vector of the 
vertex in the row or column of the 
control polygon line which has the 
Qosteleonegmecne vector list CN-100). 
301-31e indicate a keypress of 
Function keus l-le. 


* * * * * *€ EK KF RE KR KE KR RK Ke Ke KF HE KR RE KF RK 


* * * F & 
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He He Me Me ee 


He He He He 
We Me Me Me 


LOO 


eo 


30 
200 


He He Me He 
ie he Me he he 
He Me ee ee He 


He He Me he Me 


300 


SUBROUTINE WAIT 
FHGlERil* 1 BURP ER CeO 


Initialize variables For default operating modes. 


PEN ote ao 
Nebr? 
LeRe 
[osc 
IKNOWN=O 
IPICK=1 
rep lL pet 
iPS et © 
TxXY=0 
TXZ=0 
PyYa=0 
Pree Sre = 


Receive and decode integer message from PS-300 
program. 
PaecesGlnt.oh.0) EO10 130 
LENGTH > O indicates message already received in 
another subroutine. 


CREE PSPOLEGEO” BUPFER  EENGaGH) 

Dee CLeNGinh. £.0 OC omeniie to 

BeSeRECLENG Be eOO SUFFER?) se 
Pokal .Gl3) 

Pe or ee O 


If message indicates new vertex vector is coming, 
go to subroutine MOVING to receive and act upon the 
vector. 
Cee QUE. o.ANNDMSG.L1. 3000 THEN 

SAE nay NG SOreeSTes- MSG, LENGIH, BUFFER) 
ENTE 
PPC nONE seo, 2 AN wtoGwit .SsdCoe 5010 TOO 


Vertex display toggle. 


PP) CheBEwE:t 3) THEN 

Pee GMiaGne a gO LT nc 
Pe Pe Lees) 
ie Cler. otic! Lo RS 
Peet Cran. 2omeaLlL CPLINE 
PNGGBEM Geo 2OO SURPERD ICP 

Dope c SocNDeh ic Th) 10 <1>CPNODE; * ) 

PALL Seooeiireces. BUFFER? 

ENDIF 





i 
oweew E-SoOline surface display toggle. 


te -ChSG6, Ee sOe mr nen 
SSeS 
if CL BS Ghee tes <0 
IF Clies7et ee escaLll BSSPLIN 
ENEGDE 3Gesee G7 SUPPER? [8S 

a0 POR ieeeoeNe Pixee 11 3520 <1>S8ShiGUE; * ) 

Cabbie Sssbiumces, SUFFER? 

ENDIF 


“eeee Known surface display toggle. 


iF ChS6 ES 0s >) THEN 
IKNOWN=I KNOWN+1 
IF CIKNOWN.GT.2) IKNOWN=0 
ENGORBE Ceo eco sper rer? I KNOWN 
ac 0 Pei c Sener IxAt If) TO <1>KNOWNMODE; * 2 
SAP ooe ND SCle SUPPER? 
ENDIF 


wee «€6©lnteractive mode toggle. 


TP  ChsG. SensOs) LEN 
LP CneBeE sea. 1) FHEN 
MNODES=3 
ELSE Te -Gebe ses) THEN 
MOURA 
BNO 
ENEGODDE .Ces. ss04cUERere sG0E 
sac BORA t ecoe Nl CO ie TO <i>MOUE; *) 
CALL PSSEND ttea> COUPE ERD 
ENED 


meee” 2c-Clipping toggle. 


if hse. ESL s6s) nen 
(Cl SP See ae 
1F> CICURER Gt ee ee eee = 
ENGGDE 3Ge7 sno 7ooewen) ICLIP 
a0 BeRiot wp Gsoe Niemi i TO <1>CLIPHMOUE; ’ ) 
SOL eosk ND aCe DULLER) 
Enis 


“eeee Roflection display toggle. 


PE eno -bG 30s tie) 
iF CHebe Sens) StaeEN 
ODEs 
(RoC T]e 


mNnonM 





Les 


: CALL PSSeEND Ces, 

E + Somat KGa eros reO@DE; * D 

C EAE oseNbCee, 

e a SSe\imeer® <l>NEW MODE; * 3 

ie EAE Ee eer ret 

ie Cree esse NEC 0 | 

ie + Saver ixoly 1G <1l>REPLECTIMO@DE; *) 
i. ECSE pew Gr @irea ce sAND. IRELET.E0O.O) THEN 
e (Reve TS 

& PAalLE REFLET 

e CALE Pose Ne C30). 

ie te SSE Newel Cot eG <l>REPLECTMGDE: 2 
e PES Cro Obeweeee wD. IRFLET.EQs19 THEN 
e TRrle t= 

e PAE er soCNEeG30 | 

ie 7 Soe Neer lx eo) 1 <1>REFLECTMOGDE: 3 
Ee (0/218) 25818. 

B ENE TE 

B EMD 


o=e== XY intersection display toggle. 


Hees. BE 307) THEN 


E et) Ee ee Ome IN 

& PAL xXyYSs 

e Gees en ole ae le =O) 

fe Pe SC lx yeee lo CALE PLANESC1) 
C Peeiemces, SsO,SUFPERD IXY 
2360 PORIRAe € SENDDEIKC* , 11. 
€ OE 7) TO > XYMODE; * 3 

fc CALL PSsevbetes, BURFERD 

C PP eel a wea oo ne OO 

iS ENDS 


moe = FPOint-to-row picking toggle. 
LP VOnEbes eas ANE. TPIek.EW,.1) THEN 
[PlEK=2 
EAE PSSENE Ce 7 .. 
+ SS ENE KGew heel PLECKMODE. 72 
ENDIF 
ENE hE 


Hume XZ intersection display toggle. 
Peso 2G. SOR) LaEN 
re OS ChORE. Eis oe ie 

[XAST X21 

Demet Ac .oF.c) [XyY-C 

iG XZ 5b) Peele PELANESCe) 

ENIGBDE Sees see Sub eek) IxzZ 
270 PORMe@GroeND rIxc*, 11, 

t eae ne Our sD 


N]AMANAM 








Hes 


‘2 SRE eSSosene C25, BUFFER) 
ce thee, 20.0) GOTO 466 
ce ENGI E 

fae ROW=tO-polne plickime toggle. 


Pe Chloe Sar Ss .oND LR ICK.EQsc)) THEN 
ie eK yh 
Sebo SoENE C27 , 
so Se Near Colao <1l>PLEKMODE- * > 
ENDIP 
ENE 


Seer" YZ intersection display toggle. 


Caenos. eae SOojmaNO MOE iS) HEN 
Le Cec 
Eee. Gl. cial Yaa 
LE Cl eomeoie ) CAbt ean Sc 3) 
ENE GOES Ges, JOO] SURrPER) [YZ 

380 BORN t Case iieami xc Ti") 10 <1>yYZMNODE; *) 

CA EES rool Ces. SBURPER 2 
ieee a. oe Olmoe ls 20 

ENBIF 


NOONAN M 


fee Select input/output menu. 


PeSciss.2£0. 310) THEN 

EAS] = SHORE 

MORE Ss 

CAE eee oSeNOe Ges. oF Niel Aca) (O°<tenope:* 3 
ENDIF 


foe Reset Function toggle. 
PreeensS. Eta ii) DREN 
PRE Set “PRESET 
Peel Re oe i. Sas el Soe lewd 
EAL CRESE PEC RRESE 3 
ENDIF 


eis eta Lo rin 
EGEES PSsENE (i, TNmIeeI Ze; ) 
Revoir 
ENGI 
ENB Pr 


eeeee T/O menu selections. 
Pe eOCnO@BE.E@.4) THEN 
IF CMNSG.LT.31e€) CALL IOCNSG-300) 





3 He Me He Me 
Mt He Ne ME 


Me ME ME He Me 
Me Mt Me Me Me 
Me Me He Me 


ZOO 


Pe 


re Ch SGink Gard lee men 
NODES LAST 
PNEGUE Ges 230) BUFFER? NODE 
Pave Soe Nem oonoUrr eR) 
ENDIF 
ENDIF 
Piciqges FPS-3s00 program to send new variable values to 
all ’FETCH’ nodes. 


See roo Ceo Senet te <1>NEW MODE; *) 
Cane eS 


[S epaeagling a fumction “off while in mode ec, ensure 
all mode-e Functions are off before returning to 
mode 1. 


Peewee net ln, ea .O sh. 1X2. EO. O;AND.1Y2.E0.0 


eo EIN 


Hebe = 1 
SOP ooenbwees. seb rl xel) 16 <i-eMObE; *) 
Sees Se Nee e Seater <ioNeEW MODE: *2 
BNET Fr 
ejepgel Wels. 


END 





SPeewe il. € 


S-LINE Dat FReGRAaM LISTING 


Sree. UA is the Pa 2O0O0-resident portion of the 


Beegram, SPLINE. 
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rT rereererererererererererercecrerererrcrerceereceeeereerer er eereeereerecerer eer eer eeeterrtrtseet Ss 


WE NE He We Ne He He We HE He He Ae HE AE HE HE HE He WE HE HE HE HE UE HE HE UE HE UE he HE AE AE Ue HE AE AE ee AE AE HE HE HE EE AE EE EE Ee HE HE Ee te 


We He We We We We HE We NE WE Ne HE HE te HE EE HE HE HE He HE HE HE He He HE he AE He HE HE HE ie EE HE HE EE He HE ee HE HE HE he hE HE Ne te HE te te te ee 


le 


Ci 


LU . 


UI. 


al. 


Variables. 


01 0 D 


m 


Display 
Display 
Display 
Display 
about a 
Display 


surface. 


Display 


surface. 


Display 


surface. 


Main display tree. 


vertices. 

B-spline surface. 

points on Known surface. 

reflection of all displayed structures 
plane. 

intersection of XY planes with B-spline 


intersection of X2 planes with B-spline 


intersection of Y2Z planes with B-spline 


Connect dials. 
Translation. 
Petcac lon. 


A. 
S 
Ee 


Gall me 


Vertex picking network. 
Enable picking. 
Pemnvert Cursoresesition to piecklist. 


moO OD D 


Convert 


Picklist to integer identifying vertex. 


Remece P1lck Gl cow oo column to hast computer. 
Route translation dial signals to picked vertices 


Report vertex movement to host. 


Gl ej epi ale 


Function keys and labels. 
Report key press to host computer. 
Label Function keys and dials. 


ae 
ie. 





Pe 7 


ee ee eee ee ee ee ee ee ee ee ee ee ee ee ee ee ee 
He He We Me Me ee A EE AE AE AE AE HE HE AE AE ie Ee Ee ee EE Ee 
Me Me Me Me HE Me NE HE ME EE HE HE EE EE EE Ee EE et Variabl es We Me He Me ME ME Me Me Me HE HE AE EE HE ee ee HE 
Ie Me He Ne A AE AE AE A EE AE HE AE EE EE EAE HE AE HE HE HE EE HE HE AE Ee EE EE EE EE ee EE EE EE Et 
He Me Me Me Me Me He Me Me Me ME Me Me AE EE A HE AE AE HE AE HE He EE HE EE NE AE HE EE EE EE EE EE ENE EE EE EE Ee EE OE 


3 
SEND 
Sao iwc Saori NE SURFACE fiODELER BY OB. MICHAEL BRYANT ’ 
TO <1>FLABELO; (Display title message.} 
<2 
Bee tOST : st: PRINT ; CConvert messages going 
to host to strings} 

Se Seen test <>< t>HOST MESSAGE - 

SEND Truee bOe<e> GV HeStT : CEOnVere Eleating-—point 
numbers to exponential 
format. 

oo 

few MODE: =F: NOP; CNo-operation function 
used as a tie point for 
Ene eeiaggers of FETEH 
commands for all 
variables, which are 
triggered by the host 
computer sending any 
value to NEW MODE? 

<2 

VARIABLE BSMODE; CB-spline surface 
display mode: O=not 
displayed, 1displayed.? 

SPINE LAC) mC <i> BSHODE; CInitial default value? 

RPETCHESWOBBE #2 - FETCH: 

See eS SsnOBE s1® <e>F ETeHeS iene. 
SON Bete NtwmiOga<1>- <i> re lenesnoum- 
<2 
VARTABLE CLIPNODE; S2-clsoing moce: I=off . 
eons 
Santer ixcil) 10 <1>CLIPHObDE- CInitial default value? 
Patent el te Che s=—F: FETCH: 
Seo One mi@=s<e>PETEHELIPMODE -; 
SENNECT eNewW MOD E<1>-< > ETHEL I PHGBE - 
cy 
VARIABLE CPMODE; Clentool Point Gisplay 


mode: O=not displayed, 
l=points displayed, 
e=eammeceing limes? 
Seine <cev TO. <1>CPHiGbE: CInitial default value}; 
Pe Reve rMObn wer: FETCH: 
SS eee ete <e>Pe tener be- 
GGNNEGI NEW HMOBE<1>: <i> Pal GHErPnebdeE ; 
2 
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VARIABLE DISCARD; {Provides connection for 
FuUREGEom GUEDUtS lert 
intentionally unused, 
without receiving a "no 
COnmMeCeEtenm Made “to ....” 
error message on screen} 


oD 
VARIABLE KNOWNMODE ; {Known surface display 
mode: O=not displayed, 
l=points displayed, 
C=connecting lines} 
Seibert 4Ce) 1G le KNewNIODE -; {Initial default valued 
FETCHKNOWNMODE: =F: FETCH; 
SEND ’KNOWNMODE’ TO <@>FETCHKNOWNMODE ; 
CONNEC TeNEWPMBBE<1>-:<1>FETCHKNGUNMODE : 
co 
VARIABLE MODE; {Function key menu mode: 
1l=main menu, most 
Functions available 
C=display of reflection 
Or intersecting planes 
selected, interactive 
mode not available 
3=interactive mode 
selected, mode e 
displays not available 
4=input/output menu 
selected} 
Seb wel XCl) TO <i>MeDE- CInitial default value} 
He LenIOUE: gm: PEPE. 
SEND SDE SO ese7 PE veniOaE- 
SENNEGT NEWSMGBE<1> : <4> Fee nieae ; 
oy 
VARIABLE PICKMODE; (Vertex picking mode: 
l=individual points, 
2=rows/columns of 
DOlLDeES? 
Sener i xc 10 <> Pl eCKMmebe. {Initial default value} 
Pere eK eb E w— FETCH: 
SEN -lLEKWODE” 18e<2>F ELE TEKMODE: 
CONNECT NEW MODE<1>:<1>FETCHPICKMODE; 
o> 
VARIABLE REFLECTIMODE; {Ref lection-about-plane 
display status: O-off, 
eine 


See CO lone boner ePeTMOBE;Cimitial default values 
BET ERREP CEE ODE = BETTE: 
SEN er Pe hMObe. Te *Ce>FrETGHeerLECTMODE; 
fo lea iNew) MODE <i> .< t>FETEHREFLECIMODE; 
cae 





tes 


VARIABLE XYMNODE, X2NODE, Y2NODE; CDisplay of inter- 
section of B-spline 
surface with orthogonal 
planes Ci.e. 
waterlines): O=not 
displayed, 1=coarsely 
spaced, e=finely spaced; 

SENET XCO) e6O << lox VBE: CInitial default values? 
FETEHXYMGDE: SF : FETCH: 

SENoe on emE 10 <e>FPETEHX Ynebe- 

EGhINEET NEW MOBE<1>:<1>FETEHXYMGLE : 
SENS” FIXCOy TQ <l>xXZnoue; CInitial default value} 
Peren Acne as). PE Ten. 

SENDS “24 iIGDE G0 <e>FETEHXZHORE: 

SOnRNEET New Sniegepe<l>:<l>FETEHXZMGDE: 
SENVEeE TX COom This yY ZOE. CInitial default valus} 
PEG y ZnO DE eh FE Ten - 

SEND Maz OBE tO ace> RE TEHYZHavE ; 

EENNEEt Newent >< 1> FE Teny ZowbeE. 


SHE WE eA ME EE EE NE UE ME ME ME He BE EE EE EEE EE EE EE EE EE EE EE ie EE EE EE EE EE EAE Ee EE 
WE ME WE WE ME ME NE ME HE RE ME ME UE EE Oe EE EE UE Se RE EE EE EE Ee EE REE RE Ee EE EE EE EE ee EEE EE Ee 
We We We ME We AE EE ME ME Ne HE UE EE EE HE EE EE EE HE EE EE EE ae EE HE EE EE ae ERE HEE EE EE EE EE Ee ae SE 


SHE We We ME ME We ME We He ME HE HE EE NE EE ME Ee EE NE EE EE EE EE RE EE EE EE Ee EE ee Ee EE EE EE ee ee 


3; 
meee Seset HEPIH CLIPPING GFF APPLIED IO CLIPPER; 
eee WINDOW A=—-1l:22 Ye-1:1 FRONT=0O 
Bee sO APPLIED 10 CLIP INGENSITY: 
SimteomiNTENSTTY:=SET INTENSITY OFF 12:2 APPLIED 10 ALL; 
{Disables depth cueing 
Whem Clipping is on, to 
allow viewing within 
Narrow clipping windows? 
MisrelLAY CLIPON; 
Few seSiN STRUETURE 
PI EWPOR) wii eV E Rie CNT ENSTIY=™.75: 1; 
TRAN: =TRANSLATE BY O,0,0; 
Roi =e le 70: 
SCALE. SSCALE BY 1; 
SET -"SET CGNDITIGNAL BIT 1 ON; 
LNGtei@e. GF (GP (Set  ssesel KNOWN SET ,PLANE._SET; 
BNGESTRUGGERE : 
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We We We We ee eG Ae AG NG GE EE NE Ne NG 0G OG AE Ne EG NG OG OG Ae eG OG AE AE NE Ae A EE EG AE AE AE Ae EG AG NE AE NG EE Ge ee 
ae 7 eee Display Ceomtral Peints (Vertices) ****4u eae we 
Whe He ie We ee NG ee Ae OG NG NG OG WE OG NE OG NG Ne NG NG NG NE Oe NG 0G NG BG UE BN OG AE OE 0G NG NE BG NG 0G NE NG OG NG NG NE NG UG NG AG NE 2G EE NE HE ae ae 
3; 
ee eS LEVEL OF DETAIL GM 1 THEN CP IF; 
CNode to connect toggle 
ee) 
CNNee P Pe tEHE PbS i>] <1lolP SET: 
Meee LEVEL OF DETAIL >O THEN CP; 
(Display vertices unless 
Pogue Off .. 
See NSTANGE GF CP PI,CP LINES; CStructure consists of 
two branches: points and 
SOnmecting lines.2 
Sel iNES:=BEGIN SITRVUETURE 
iF EBUEL OF DETAIL 2. 
(Qrsplatie2e toggicd on.2 
SClPrend@=scl PISKING ver. . 
{Create picking node to 
allow vertices to be 
moved a row or column at 
a time by picking the 
connecting line} 
SET PICKING [DENTIF lbReePrss: 
{NSTANEE OF J EPi-- CCPL is a vector list 
which will be provided 
Gyunamically By the host 
computer. } 
Orie = OFPErOR eS eee =200 
OO O20 Ge OF {Reserve memory for 
vector list.+} 
PNDUCSTRUETURE. 
2 
Seer! SSEGIN STRUCTURE 
Slew se)  P LeKING FP. tGeeate preking node tc 
allow vertices to be 
selected in interactive 
mode by picking with 
tablet and stylus? 
INSTANCE OF 
EVO Croce tenOs, Cron eros er Oe. ECPO7. CPOB., 
PrPOoVGr OsC rl Crile Grease iter iS, CPibs, 
Ce ee oe hon eens lee. Cres, CPet, 
Gres Speer ere, ~eped Gres EPS0,GP31,CP3c, 
ePaa GPa eh so Grae eae ao bP Sao, CPO. 
Get lee Pee eet eel ee ereretoS CPM, CP4S, 
Geo ee SO Grote Pocwerosmerst. CPSs. CPSés, 
Seo ee obe eres er oorers!  CP6e,CP63,CPS4, 
Seo Soreeoe Ome, SP eamerodm@rsO. CP7iwCP/a. 
Beemer ter So Sey omer 7, er 7a. CP/S.,CPSO; 
Eee e ; 





La 


{ 

Pepi nilelems of CPOs EhnoouehrerSe will bersupplied by the 
host computer, with the necessary nodes and connections to 
allow the vertices to be individually manipulated in the 
interactive mode. The program lines supplied dynamically 
From the host computer will have the Following Form Cwith 
the O1 replaced with the appropriate number for the nodes 
associatsd with sach vertex): 


Bee ois="BESIN STRUCTURE - 
Sel ePIGKING IDENT. TERSGFOl CAablows 1cemtificaiton * 
_ of which node was x 
‘a pieced fOr imteraction. * 
* TRAN: =TRANSLATE BY 0O,0,0 CThis node will connect* 
~ through an accumulator * 
- and switching network * 
* to the dials for = 
” manipulation of the - 
a picked vertex. initial 
~ placement of the vertex* 
- Will also be specified * 
a through the network a 
= connected to this = 
* node.) * 
og INSTANCE OF CUBE * 
fee STRUCTURE = 
* * 
Pee ETAL Ol: er; ACCUMULATE (SeedcesecansSlation - 
= accumulator for each = 
VE ee a. © 
- CONNECT TRAN _TOTAL_01<1>:<1>CP01.TRAN = 
* * 
. mes Cx a y.2Z) TO s<e>TRAN TOTAL. O12 ~ 
> Cintewed. Veltex = 
= QOsSTe1en),2 
- SEND UC0O,0,0) TO <1>TRAN TOTAL 01 - 
- CGive accumulator an = 
- initial value to act = 
- upon before input from * 
= dial is received). ~ 
- Seem, 2 ete <4> TRAN TOTAL ©2 ChMultiplier For dial * 
* sensitivity.) ve 
. 

Sipe SINSTANEE OF FRONT, BACK, SIDES; CEach vertex is 


represented on the 
screen by a cube. } 
BACK: TRANSLATE BY 0,0,0.01 APPLIED TO FRONT; 
Peon ie sVEETOR LISt 2=—-0 .005 tes 
aOR OOS ao. oes Geo@> —enoes 0,065, 0.005 
On OOs> son OO> me OrmOoo. 6.005; 





Pe 


SebBsePsVEe tor List Sirane2 
BOMOOs  momeen OO ,0085  —O CCS, ©.COS,-0.00S 
BOAOCon ae seOs Oo ,COs, —@,005,—-0.005,-0.005 
Sees -— ©. Ces. 0005 Gregae ©, 005,-0).005 
G2cOS, 5.0 6s, OF 00S O7eeOSo. CCS, —-0:.00S; 
c 


WE We We We We We WE Me HE ME HE He SE NE He HE HE HE NE i NE HE UE Jit HE He it HE He WE HE HE HE HE He i HE HE HE HE He HE Nt tt NE he Ne A HE HE ME HE HE it NE He HE ot 


We We WE We WE WE We We We We WE WE Ne He He He WE HE I HE WE HE HE He He HE HE HE HE Ut Ne HE HE HE IE HE HE Ut HE HE HE NE HE HE ONE HE Ut HE NE He HE IE HE ME HE Ut ot HE 


3 

Pao: )teoel LEVEL OF BETAIL TG ft THEN BS_IF; 
(Display B-spline 
SUanadee 1 TOggGled on. 2 

SOVNEET PETEHSSHIODE<1>:<1>BS. SET; 

Pom weir LEUREL GF BEIAIL >O THEN BS; 

oe NeroNee, OF Si. 8Se,8535, BS5.5S5,8S6,8S7, BSée; 

c 

The host computer will dynamically provide program lines 


defining BS. These commands will be of the form: 

* Boeke lor. Liste tte! ZED N=xxx > 
3 

{ 


WE We He He We We HE WE He WE HE HE WE WE Se HE HE We He We ie He WE He WE HE HE He HE We Ne WE He He ie He He He WE WE WE He WE HE He WE UE Ne He HE HE WHE ie Se HE HE ie He 
We WE We Ne We We We We WE HE HE He HE Display Points on Known Surface Me We We We He He We He He He Ae ee ae 


Te We We We ie Ae NE UE ie WE ie HE HE UE HE WHE EE ME UE HE HE UE AE AE HE AE HE AE NE HE Ne He Ne HE UE Ue UE UE a HE EE Re UE OE EE Ee HE eH 

Ee 

PUN oet SET LEVEL OF BETAIL T@ 1 THEN KNOWN IF; 

CDisplay known points 
Pioeeae eae om: > 

CGNNBET PETEHKNOWNMODE<1>:<i>KNOUN SET; 

RwowN IP ASIF LEVEL OF DETAIL >O THEN KNOWN; 

KNOWN: =INSTANCE OF KNOWN PTS, KNOWN LINES; 

C3 

KNOWN PTS:* INSTANCE OF 
Mpuro@gin e<-1OOe, KPIlOOs, KrieOot Ss RriGes, Kr Os, 
Nmeo “em LOGE. KPIOOS, KFIGlGyen-telt. KPiGlc, 
Matis Ko lOite. KPTOLS. KPTOlo skruol7 . KPIOLS, 
MeiceeommmerlOc®, KPiGel, KPi@ee, Krides, KPTOc4, 
Muu@es. KrPlOes. KeiGer ne loce. SPlOeo, KPI@es, 
Nome s@r air hOS! shir lOse, KE logs, Krriest, KPIO35, 
haaOsoo mewn tOa7. Kr lOss) Keiess. KPITOtO,. KPTO41 , 
reece we Tots. KrPiOgtte<-lOtoa. SPiets, KPIOY?, 
Secor ioOrts. KrPieso., Kriosi. KFi@me, KPIOSS, 
hates ae ooo KP hoses Npros7. KPTeSd, KPIOSS, 
Mapt@o@re <r lO6L. KPi@52," KrilOs3, KPTOS4, KFICSS, 
Kec owmeewmess7, KPTOSe:) KrPlOGsa— KPIC70, KFIOZ1, 
Menem Kr i O7 ae KE lO7t, ekrlO7>. KPIOC/7S, KPIO/?7, 
WenOMe mes tO7S, KPLOBO. KPITOS1, KPrOSe, KFIO8s, 
MeheOa tee toOes, KrlOSs, Krles7, KFI1O088, KPIOSs, 





ee 


KPTOSO, KPTOS1, KPTOS2, KPTOS3, KPTOS4, KPTOSS, 
KPTOS6, KPTOS7, KPTOS8, KPTOSS, KPT100, KPT101, 
KPT102, KPT103, KPT104, KPT10S, KPT106, KPT107, 
KPT108, KPT109, KPT110, KPT111, KPT112, KPT113, 
KPT114, KPT115, KPT116, KPT117, KPT118, KPT119, 
KPT120, KPT121, KPT122, KPT123, KPT124, KPT125, 
KPT126, KPT127, KPT128, KPT129, KPT130, KPT131, 
KPT132, KPT133, KPT134, KPT135, KPT136, KPT137, 
KPT138, KPT139, KPT14O, KPT141, KPT142, KPT143, 
KPT144, KPT14S5, KPT146, KPT147, KPT148, KPT149, 
KPT1SO, KPT151, KPT1S52, KPT1S3, KPT1S4, KPT155, 
KPT1S6, KPT1S57, KPT158, KPT1SS, KPT160, KPT1651, 
KPT162, KPT163, KPT1654, KPT16S, KPT166, KPT1657, 
KPT168, KPT169, KPT170, KPT171, KPT172, KPT173, 
KPT174, KPT17S, KPT176, KPT177, KPT178, KPT179, 
KPT180, KPT181, KPT182, KPT183, KPT184, KPT185, 
KPT186, KPT187, KPT188, KPT18S, KPT1S0, KPT1S1, 
KPT192, KPT193, KPT194, KPT195, KPT1S6, KPT197, 
KPT188, KPT199: 


{ 
Ser@etures KPT@OQ1 through KPT1SS will be provided 
dynamically by the host computer. The commands provided 


Will be of the form: 


“ KPTO37:=TRANSLATE BY x,y,z APPLIED TO STAR * 
} 
STAR: =VECTOR LIST SEP N=14 


0.000, 0.005, 0.000 0.000,-0.005, 0.000 
-0.005, 0.000, 0.000 0.005, 0.000, 0.000 
-0.004, 0.004, 0.000 0.004,-0.004, 0.000 
-0.004,-0.004, 0.000 0.004, 0.004%, O.000 

0.000,-0.004,-0.004 0.000, 0.004, 0.004 

0.000, 0.004,-0.004 0.000,-0.004, 0.004 

0.000, 0.000,-0.005 0.000, 0.000, 0.005; 


ou 
Paes: LP LEVEL OF BETAIL™ 22 THEN KLINES; 
CDisplay lines 
connecting Known points 
teameoagglea on.3 
faves NOTANEE OF KLOI,KLOe, KLOS;,KLOY, KLOS, KLOG,KLO/?, 
KEOB. KigOs Ki WOe KEI ake KLIS  KLiY: 
{ 
KLINES, the vector list defining the lines connecting the 
known points, will be provided dynamically by the host 
computer. The command provided by the host will be of the 
caeisin : 


* KLO1:=VECTOR LIST ITEMIZED N=xxx * 
} 
C 
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Ae AE AG AE AE AE OE HE UE UE AE RE UE Re UE OE ie OE AE OE OE OE Re AE OE ae ERE EO EE Ee AE OE OE OE OE Ee ee ee Ee 


iia Solow Ker LeCElom About a Plane ****=e ees wae 
SMe AG EAE AG AE EE UE Ue UE AE SOE AE UE AE SE RE AE UE AE AE UE AE UE HE AE ee Ee Ee AE ee EE ee eee he Ee Ee 
e 
Paes set oes LEVEL OP ODETAIL TO O THEN REFLECT IF; 
(Display reflection 
Le peaches On.) 
SO Neer eee tetRE PLES RHOBE<i>:<1>REFPLEC!T SET; 
peer eh te seir LEVEL GF BETAIL >O THEN REFLECT; 
“a 
REFLECT, the vector list defining the reflection of all 
displayed structures about a plane, will be provided 
dynamically by the host computer. The command provided by 
me NOSt will be of the farm: 


- Ree Cre Urerer LISP ITEMIZED. Nexxx 7 
+ 
e 


Wie Ae AE AE AE AE AE AE AE EE AE Ae AE AE UE Ae AE AE AE AE AE EE EE Ee ie AE EE Ee Ee OE EE EE ee et et 
ao =~ Hisolay Intersection With XY Planes *“******"**«* 


We ee Ae AE AE AE AE AE UE ie AE Ae UE AE AE UE ee Ae AE AE OE UE it EE AE AE AE OE UE OE Ue EE Se EE Re EE AE Se AE ie EE Ee ie et 2 
f 
Pees cence tl PEVEL OF BETAIL TO O THEN XyY_IF; 
{Display intersection 
if toggled on.} 
SENNEeT RPETECHXYNOBE<1>:<1>XY SET: 
Pooler POL EUEL OF DETAIL >O THEN: xyY. 


co 

Pe=TNSTANGE OF XYC,XYF: {The sturucture has two 
levels of display 
detail: coarse and Fine} 

oS eRe Or Petal bem etHeN XYP INE: 

{ 

The structures XYC and XYFINE will be provided dynamically 

by the host computer. The commands provided will be of the 

Roc mM : 

mn Mr GergUBCUGR LIST [TENIZED frxx~x ~ 

ee hoover: ER TOR Dist 1lENIZEgaNs=x = 

c 

< 


ie ee AE Ae AE AE AG A AE EAE SAE AE AE AE SEE 0 SE Se AE Re EE EE Se Ee ee ie et EE EE Eek EE EE Et 


Meee Shilo Intersectian With x2 Planes *******"*** 
We Me Ae Me Me AE Me AE AE AE A AE IE AEE EE AE AE IE Ue IE AE A Ae AE AE AE EE SE EE Ae EE SE 2 AE SE EE EE RE SE EE EE 
} 
Pemoote oo PEUEL OF DETAIL TOO THEN X2_lIF; 
{Display intersection 
fo eGeagg Led on. 3 
See e tex ZiOUE<1> :<i>X%Z Set; 
ae ee eUEi oor DETAIL >O THEN XZ; 
1S) 





IES: 


Pe No toNee Ol AZG, XZF : CThe sturucture has two 
levels of display 
detail: coarse and Fine} 

Nepeee eee UE Ter BETA iste THEN XZRINE; 


r% 

The structures X2C and X2@FINE will be provided dynamically 
by the host computer. The commands provided will be of the 
aoEm: 

- (Zee Gem Ciliol LlEMI Ze DaN=kx<x< 
i Meher POE CLR lot Tien iZeED Nexxx - 
o 

. 


He Me We Me Ae WE Ae AE ie AE AE RE Re Ee Ae AE EE Ee Ee Ee EE Ee Ee EE ee EE 


ee oo la ImMtersection With YZ Planes ****""*""s=eu* 
We We He Hee We ee ee Ae Ae Ae AE ee Ee AE I ee Ee Ee EE EE EE Ee EE 
3 
ee oer eee Sr DETAIL [OQ O THEN Y¢_iF; 
C(Display intersection 
ip seem led (Om. 2 
EENNEE Tere Pen y 2nODEel >: <1>y¥2Z SET; 
eer A PeeLEVEL OF DETAIL >O THEN Y2; 


ee 
wee NSTANCE OF YZC,YZF:; {The sturucture has two 
levels of display 
detail: coarse and fined 
Zoe eV OF BETALI #2 THEN YZPFINE; 
§ 
The structures Y2C and Y2FINE will be provided dynamically 
by the host computer. The commands provided will be of the 
SOrM: 
YZEPVECTOR LIST ITEMIZED Memx~x = 
meee VeEblOR List ten lZeD N=xxx * 


i 
* 
a 
: 
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ie Me Ae A ee AE ee ee ie Ee AE Ee EE ee ie EE ee EE EE Ee Ee EE Ee ee Ee Ee ee ee Ee OE 
ME Ae he Me Me Me HE HE ME ee NG A Ne NE EE NE NE AE AE EE Ge He NE Ee EE Ee EE EE ee UE ie EE AE i Ee EG AG Ee Ee Ee ee 
We ME Me Me Ne Me ME Ne EG Ne Ee EE Ee ee Connect Dials We Me ME Me Me AE A AG HE Ee ee EE Ee EE 
ME Me Me Me Me Me Me Me Me Me Me Me Me ME Me ME Ee Me Ne Ne Ee ee Ge ME AE Ge Me ee Ne ee ee EE HE HE ie EE AE EE GE he ee te 
We ME Me Me Ee Me Me Me Me ME Me Me ME Me Me Ne Ne ME Ee AE ee AE ME AE he A AE Ge AE AE EE Ee ie EE Ae Ee EE ee EEE he a Ee et 
3 

< 


Me Me Me ME Me Me Me HE EE Me EE ee Me Me Ee EE ee ee Me HE ee He ie He Me ME Ee Ee ME Me Me ME Me Me Me ee Ee Ee ee ee 
He He He Me ME Ne he Me Ne Me Me Me he ee Me te Ee Translation Dials We He He Me Ne ee Ne Me Me Me Ne Me Ne he i ee ae 
We He ie Me Me ME He ie ME Me Me Me ME Me Me Me Me Me Me He Me Me Me We Me Me Me HE ME Me ME Me ME ME Ee ME ee ee AE EE Ee AE HE EE Ee eee 


ooo ees Convert dial Signals to vectors. “****eseennne 
y 

mean Xe=P- XVEC; 

meAN Y: =F: YVEC:; 

eon 2:2=F : ZUEC; 

CONNECT DIALS<1>:<1>TRAN X; 

CONNECT DIALS<2@>:<1>TRAN_Y; 

CONNECT DIALS<3>:<1>TRAN 2; 

“ 

“uewee Create switching network which applies Tagiedae oe 
Seen) ehomSslation dials to global translation (Cif in *“**"*"* 
fae MOGes } or 2), vertex translation Cif in mode 3,***** 


foe lmMceraective mode), or no translation Cmode ‘4, ae 
3 


SWITCH TRAN: =F: CROUTEC4): 
CONNECT TRAN X<1>:<2>SWITCH TRAN; 
CONNECT TRAN Y<1>:<2>SWITCH TRAN; 
CONNECT TRAN 2<1>:<2>SWITCH TRAN; 
CONNECT FETCHMODE<1>:<1>SWITCH TRAN; 


£ 
foo eOMMeet Sujiteh to global translation node if in **=** 
Me Me mode 1 ar Cc. eM 
3; 
mreN TOTAL: =F : ACCUMULATE; CAccumulator for global 
translation. } 
CONNECT SWITCH TRAN<1>:<1>TRAN TOTAL; 
CONNECT SWITCH TRAN<2@>:<1>TRAN TOTAL; 
CSWITCH TRAN<3> will be connected later} 
CONNECT SWITCH TRAN<4>:<1>DISCARD; 
CONNECT TRAN TOTAL<1>:<1>ALL.TRAN; 
o> 
SENGieece,O,@) TO <2>TRANeI OTAL. 
CReset value for 
translation. } 
SEND 1 TO <4>TRAN TOTAL; Sotahiar MuLeioller for 
dial sensitivity? 
Seer) elo fe <l>SWIICH TRAN; Coefaule initially to 


mode 13 
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{ SUweentmu ieee Commeectea tO cCOonmtroel point translation 
modes at a later point in the program.} 
{ 


Me ME He He Me Me He HE Me HE HE HE AE HE HE HE HE HE HE WE HE HE HE ME Ne HE HE HE HE HE ME HE HE HE HE NE HE HE HE HE HE HE HE NE HE NE NE NE HE HE HE HE HE NE ot 2 te Ee 
We We We HE HE ME WE NE HE RE HE Ne Ne dt ME NE NE ee ate et Rotation Dials ee ee ee ee ee eee ee ee 
We He He ME HE He ME Me HE HE ME Me HE Ae HE HE ME HE HE ME ME HE HE HE ME HE ME Ne HE HE HE HE HE HE ME ME ME HE ME UE ie ae HE EE He Ee ie HE HE te ee NE NE EE oe 


> 

Ponies MULE: CHiuibeloliers for dial 
sensitivity? 

ius — - MULC: 

Buus a=e > MULE; 

MenNECT DIALS<S>:<1>XNMUL; 

PPeNNECT DIALS<G>:<1>YMUL; 

BONNEET BIALS<7>:<1>ZMNUL: 

oe 

mor x eer: XROTATE: {Convert dial signal to 
GOtate Lon? 

mony: : YROITATE: 

ROI2:=F:Z2ROTATE; 

CONNECT XMNUL<1>:<1>ROTX; 
Pena t ey MULGi>:<1>ROTY -: 
PenNeGiezZiiuL<l>:<1>R0TZ; 

eo 

me) Ae CuUM.HF -CMUL; €CAccumulator for 
rotations} 

EONNEET ROT ACCUM<1>:<1i>ALL.ROI: 
CONNEET ROT ACCUM<1>:<1>ROT ACCUM; 

<3 

Peoet xX mt: XROTATE: {Upon signal from host 
computer, resets 
accumulator with given xX 
EGeacion and O For Y and 
Ze 

CONNECT RESET _X<1>:<1>ROT ACCUM; 

Reool sy: *h: YROTATE; CUpoen signal from host 
computer, adds Y 
rotation reset value to 
accumulator and triggers 
accumulator to fFire.3 

SONNBE PeRESET Y<1>:<e2>ROT ACCUM: 
C 
2 = SEeate Switching network For ROTATE function ee 


aoe ewe nm will route dials to global rotation node ***** 
moe im all modes Ci-3), except when in interactive ***** 
fee mMoce ¢€4t2, in which case nao transformations are ***** 
wee allowed. a 
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SWrreneROG-SF -GROUTEC4); 
CONNECT ROTX<1>:<2>SWITCH ROT; 
CONNECT ROTY<1>:<2>SWITCH_ROT; 
CONNECT ROT2<1>:<2>SWITCH ROT; 
CO NebeeoswiteteRem<i>:<e>ROT AECUN; 
SENN eel esul Tene roi<e>.<2>ROT ACCUM; 
SONNBS Te Sw PeH ROt<3s>:-<e>ROr AcCuUn; 
CONV Ee a SUlTEn ROT<t> <I> 01 SEARD: 
SONNE Chew ten eBe<l>-<l>sSulicH ROT: 
{ 
ee reseed einl cid . Values. co CrOtatlan network, ****** 
} 
eenm 200 10 <e>xXMuL: (Hobetnlicaticm factor 
For vaial Sensitivity? 
SEND 200 TO <e>YMUL; 
Seen 200 TO <e>ZnuL: 
Seng FIXC1l) TO <1>SWITCH_ROT; {Default initially to 
mode 1} 
ee tiseiel,O,O0 0,1,0 0,0,13 TO <1>ROT ACCUM; 
€Prime accumulator? 
{ 


He We HE ME Ae ME HE HE HE AE HE HE UE UE HE HE Ue AE UE UE UE UE HE Ue UE UE UE Ue UE UE UE UE UE UE HE UE She UE UE UE UE NE UE UE Uk UE Ue UE AE UE UE ik HE NE NE EE Et 


MR We AG HE NE HE HE He HE NE AE SUE ME SUE SUE UE SAE UE SE HE UE NE UE UE SUE NE he NE AE Uk SE NE te EE UE SUE ME UE UE SUE UE UE AE UE UE Uk UE ME UE ik AE EE EE Et 


eB 
Sw Penis Chr LE: rs CROUTECY); {See SWITCH ROT above 
SOeeGeSer rations 

SEALE :msF - DSCALE; 

SONNBED DIReS<4>-<e2>SwitcH SEALE. 

SON Ne@n Sulrech SEALE<1>: <1>SEAQLE. 

SONNE ET SWITEH. SEALE<e2>:<1>SCALE. 

SONNE. SWITCH SCALE<3>:<1>SCALE; 

CONMNEBET SWITCH SCALE<4>:<1>DISCARD; 

CONNECT SCALE<1>:<1>ALL.SCALE; 


on 
Senear IXCl) TO <li> SWwiten SEALE ; 
C(DeFault initially to 
mode 1} 
Seng il tO <e2>SEALE: CReset value? 
Sone To <3>SCALE ; Sviiltroplication factser 
For dial sensitivity? 
SeNBeecO 10 <4>SCALE; (Maximum scaling 
allowed> 
Sees to <S> SCALE: CMinimum scaling 
allowed?> 
co 


CONNECT FETCHMODE<1>:<1>SWITCH SCALE; 


{ 





bys 


eee ee ee ee ee ee ee eee EER ERE SERRE RES EEE ERE EEE ETERS ESTEE ESTEE ES EE 


He he We We ie ie WE Ne We NE Ne EE AE NE UE NE UE Sk AE ke AE EE A Ee EE AE AE UE EE EE Ee EE AE EE EE EE EEE Ee et 


We We We We We We We We WE He ME He ME Ne Ne NE NE HE NE NE HE AE EE EE EE EE EE EE EE AE EE EE Ee NE EAE AE Ne ie EE Ee Et 


We We We WE HE Ne WE AE AE NE AE AE NE EE Ee EE EEE he EE Ee EEE Ee Ee EE EE GE EE EE Ee Ee Oe 


2 
< 


¥#uee Enable picking when stylus tipswitch is pressed.***** 


2 


ge kw lr SUES AR CROUTECY); 


EGNNMEET FETCHMGDE<1>:<i1>PICK IF RODES-: 
SONNE CeaneBibe tT IN<4>;<2>PiEK IF MGDES; 
{Sends ’TRUE’ when 
tipswitch pressed? 
EEN EC ree rexk Joes ObES<1>-<1>DISGARD: 
{Only regard stylus if 
in interactive mode (333 
Neer Gk POE 32>. <i> PSeann: 
CONNEBET PICK CIF IG DES<2>:<1>DISEARD: 


ee 
Pe. IO DBS TSCELE1] mF -CROUTECE): C(Gtreces *“truc’ ta 
proper set _ picking node, 
depending on whether in 
Sige ror sole rer ow pick 
modes} 
EGNNECGT FETCHPIGCKMODE<1>:<1>PICKMGDE ICGGLE1; 
{See variables} 
CONNBET PICK Ih wIG@HES<3a>:<e>PICKNGHE TOGGLE]; 
{Passes ’TRUE’ to SET 
PlewNeenoage Only Lf in 
mode 33 
Seve» - Pex OME TOGGLE <I> -=<1>CrP PI.SEIPICK; 
ene tOknoOegbes TOGGCLEMe> << 1>EP _ LINES.SETPICK; 
< 
a meanvert: CUCSOL POSltiOn ta picklist identifying “****™ 
ae oe the component picked. oe 
3 


EGNNECT TABLET PN@B>:<1>PICK; {Send cursor coordinates 
Pomomlen fo icGeanversiaon 
pe Picklist: 

Cab et PlEK<e>: <2e@>PICKHCDE IGEBLEL- 

Spe neuss mec ok = to 
SEs eexiINnG nede te 
disable picking once 
Pick occurs? 

Meier bEK<2g>:<e>PICKHODE [OGELEI; 

{Disable picking if 
timeout occurs without a 
pick? 





Pe 


SENEREALSE TOmse>PICK; CCoordinates of picked 
Pet Ges meoe Lequired to be 
reported} 
SE NOP reece Te <S>PrPIEK; CSet timeout limit for 
Wiehe Plck OCCUrS) 
if 
a Convene eetteGltSse inro cto integer identifying *““**** 
— = the vertex picked. eg 
3 
rues lDcer: PIEKINFOC: (Ex taeees pre 1D Cie. 
(epsae from Dicklist? 
GENE PIibk<i>-<1>PICGK. 10: {Send picklist?3 
<2 
Rae iOOE TGG6GLE2:>"F -CROUTECe): CSends pick index 1f 
Blsiimed, (2 Few OF 
vertices, discards it if 
picking individual 
vertex. 
Beier ert ene bE<i>s<l>PTEKMOUE TQGGLEe; 
SEINE CGyPIiCKkwIa< i>: <e>PIEKMOBE TOGGLEe: 
Se NEG, (eR iBEE TEE5LCEPe<1>:-<1>DISCARD; 
ey 
mee (OOF TOGGLES:sF :CROUTEC2); SSemngs e2cek 0 1F 
Bilewing  InGividual 
vertex, discards it if 
pileking. a row of 
vertices.} 
SUNNE Re Pe lenPlGKMBBE<1 >.< 1l> PIERO BE TOGGLES: 
ce REG lek <e>:-<2>PIECKiODE TOGEEE3: 
BONNEGT ee NEKMBRE TOGGLES<2>:7<1>D1 SEARLE, 
CONE PliGK 1D<3>2<1>DISCARE.: 
BONNEG IS PICK ID<4>:<1>DISCARD; 
GONNEGT PIGK1D<S>:<1>0D1SCARD: 
EONNEET PIEK @e)<6>:<1>SI1SCARD- 
BONNBET PICK 1D<7>.-<1>D1SEARD. 
GBONNEET PICK .LO<@>:< l>DLSCARD: 
oh 
mes Aolll: =F: CHARCONVUERT ; {Converts characters of 
pick ID to stream of 
integers representing 
ASCII equivalents} 
BO NHEET -PICKMODE TGGGLES<1>:-<1>PICwMeaScli!, 
(Preovices pick ID for 
conversion to ASCII3 
SENES TReee 10 <e>PIGK ASE! I- 
C} 
mbes. > SUBC; €Converts ASCII codes of 


pick ID characters to 
numeric digits. 





Tet 


Santi vow emSeli<i>-<l>DIGITsS: 
{Provides ASCII-coded 
Blew Yet ee conversians 
SeNEeEeeete? 18. <e2>DIgiis; tSeatrace a8 Frem ASCII 
code? 
eo 
munen DIGIT =P sReUuTE Co) ; {This switch will send 
each of the four 
mumerals From the 
converted pick ID for 
separate processing} 
EONNE Cie eelrSs< lhe: <ceSwuiten DIGIT, 
CPrevicdes Ene pick ID 
aigices to the switchs 
{ 
The Following is a toggling network which provides an input 
of integers which progress From 1 to 4, then start again, 
to the switch. This causes each of the four successive 
Soelcs From the Comverted pick ID te be reuted te the 
SEEresponding CutBut port For proecessing. 
3: 
Cel SEGeR TOGGLE .=F - CONStAN i 
tHe Cach Gigit 
Seeceived of tne pick ID, 
sends a 1 to ADD ONES 
SEND favGi od. LO]ce> TR leech, .eGGER ; 
BONNEET =e Tek Ase) <1 et he GGER TOGGLE; 
CProvide a signal to 
trigger the toggle; 
ADD ONE:=F:ADD; {Provides an integer 
which increases by 1 
each time a digit is 
Sene of ene pick 10> 
EONNEET TRIGGER. 1TO66RE ><> aD ONE: 
CSupolu the 1 ta be 
added each time} 
CONNECT ADD ONE<1>:<e>ADD ONE; 
SouueLu ehe sum Back tea 
Ghewtmout for 
incrementing next time? 
SEND FIXC3S) TO <2>AabD ONE: 
{Prime the summing 
Sunecrons 
C2 
Soe =F ODE: {Converts the constantly 
increasing output from 
AU MONE Eo am IL1meceger 
Sewn eton O Ehrougn 
5, 
CEeNNEe? sO VENE<t>s<1>EYELEO. 3; 
Seven wet) Te <e>CYeLeEO 3: 





G8; 


2 


e2 


<2 


O83 


fee 


ele ae: Se aoe -; tEonverces O-s cyclic 
Output from previous 
Smee rvonwe ee L-t cyclic 
SUt aus 
SONG l se vee ee a<)>:<1l>EYCLEL &: 
SEiitmer lei) te <erseyYeCeeis 4. 


Se Nee ey Slet 1<l> <i >Sulien sleir. 
CProvide integers 1-4 to 
SComero, switch? 
EONNEG Swill Ble L7<i>:<1> DISCARD: 
tHiscard the ”*CP” 
Bel 1x? 
CONVEGi sullen BiGit<ce>:< l>BISCARD: 


TENS VHS hil we.: WULE- CMultiplies tens digit 
Sts (2 number by 102 

Semen eve) Tho cee TENS Ole i; 

CO VNet i esulteteeleli<s>-<i>TENS BIGIT: 
Seaovides First of Cwo 
digits of ID number for 
conversion to tens.?3 


PlEKED CP ossF: AbD: CReconstructs the [0D 
number of the picked 
vertex from the separate 
ones and tens digits?) 

SNe Peres eo tse llc l> ol Pee Do fe: 
CONNECT SWITCH BiGli<s> = <eorilcKeED er; 


mere =e - SOP: €Provides a node for 
Other other portions of 
the program to obtain 
the picking ID from, and 
For the host computer to 
send it to in some 
cases. } 

EONNEE?  PLleKED Pete eNeEG. 





eS 


oo eel ewig Sows and columns of vertices, pass collect sas 
—— =e the pick index to the host computer for oe = 
fo eCOMNVeGSlOon ce a number identifuing the row or *“**** 
nn column to be connected to the translation eo 
i a eras. tt Mt i 
3 

Sep SET Piek==F:Abac: {CAdds offset to pick 


tinge ceepube li lnie 
range which the host 


program recognizes as 
identifying a pick 
index. 2 
CO Veee wee L@bGlEece>-<1>OrrSET Pick; 
Sorte hoG) 10 <EG>OPFSET PIEK- 
Soot O Morte Tekh. <)> TO Hes: 
{ 
After conversion by the host to a number identifying 
the row or column picked, the identifier is returned 
From the host in the form: 


= SENDTEIXC “J 10 <1> FP TEKREL = 
} 

£ 

= Establish a switch which directs the output eer 
a of the translation dials, when in mode 3, lo Tilted 
aa to the translation node of the selected lr lil 
Mh Me et vertex. Mt a 
i 

Suen Lek. =P: CROUTEC SS): Cfivsuvcechuuith. Se 


positions. The First 80 
are For the 80 vertices, 
the next ten For the ten 
rows of vertices, and 
the last eight are for 
the columns of vertices} 
EENNBETeSWITEH, TRAN<3>:<e>SWITECH PIEK; 
€Provide the dial output 
to the switch if in 
interactive mode (3).3 
CIn the program section which reports vertex movement 
to the host computer, the value in PICKED will be 
BeopeOG ted toma > owl TEHPIEK ta provede the identifying 
number of the selected vertex to the switch.}3 
{ 
The FORTRAN program on the host computer will provide 
Fs-300 commands which will connect the outputs af the 
Switch to the inputs of the translation accumulators 
of the vertices. These commands will be of the form: 


* CONNECT SWITCH PICK<32>:<1>TRAN TOTAL 32 * 
} 





. 


er 


We We We We Ae We A A AE AE Ee AE EE Ee EE EE EE EE ee EE EE EEE Ee EEE EE EE Ee EE EE Eee EE 


ee We AE A AE EE EE HE AE AE EE EE EE AE EE OE EE EEE EE EEE EE EE EE EE EE EE EE EE EE ee 


ao oe Keene Vertex Movement te Host Computer *****<*««* 
We AE He We AE We AE AE WE AE AE AE AE AE HE EE AE AE Ee EE AE Ee EE EE EE ie EE EE EE EE Ee EEE Ee ee ee HE 


We We We WE AE AE A Ae AE EE Ae AE AEE AEE EE EE EE EE EE EE EE Ee EE EE EE EE EE EEE EE Ee EE EE 


C 
Bre MOVE: =F : ACCUMULATE; 


cAccumulates translation 
dial signals if in mode 


3 Cinteractive mode).>} 


CONNECT SWITCH TRAN<3>:<1>CP_MOUE; 
SEND UCO,0,0) TO <2>CP MOUE: 
SEND 0.001 TO <3>CP MOUE: 


CReport accumulation at 
this interval.?} 


SEN) O12 £0 ee en 


mese ower NOUR fF; CONSTANT. 


{Scale signal to match 
scaling at individual 
vertex accumulators. ?} 
{Resets accumulator to O 
each time the 
accumulator fires, soa 
only delta values are 
sent to host computer. 3} 


CONNECT CP MOVE<1>:<1>RESET CP MOQUE; 
SEND UCO,0,0) TO <2>RESET CP MOUE; 
CONNECT RESET CP MOUE<1>:<2>CP MOUE; 


{3 
MOVE SYNC: =F:SYNCC(2); 


{Ensures that currently 
picked vertex identifier 
is reported to the host 
computer immediately 
before the vertex 
position delta is 
reported.?} 


MEOUE ints ONE.=— CONSTANT. 


{Sends the current 
picked vertex identifier 
to MOVE SYNC each time 
the CP_NOVE accumulator 
Fires.} 


CONNECT CP_MOVE<1>:<1>MOVE THIS ONE; 
CPICKEDe<1> will be connected to 
<2>MOVE THIS ONE below.?} 

SUNNMEGY MOVE THIS ONE<1>:;<1>MOUE SYNE; 

Pevieer (er TOUER<1>:<e>MOUE SYNE: 


ee 


CONNECT MOVE SYNC<1>:<1>TO HOST: 
CONNECT MOVE SYNC<2>:<1>TO HOST; 





i 


=o -sSSelLOlne fFeuUsSing the accumulator, CP_MNOQVE, for oe ee ee 
eo == anetner Vertex; report any remnant in the ol) oats 
=== sccumulsator toe the host computer. a = 
D 

2aroc=r - CONSTANT: €CProvides a zero to be 


Seme te <s>CP Mevue. 
allowing accumulator to 
Fire without waiting to 
reach normal firing 
increment. ? 
Seis ere Pewee 1> = <]>2ZERu. CTrigger the accumulator 
Firing increment to be 
reset to zero whenever a 
new vertex is picked for 
movement. 3} 
pene © TO <e>ZeERO: 
UECZERO: =F : CONSTANT; €CSends a zero vector to 
Ser GUE. Gausing ene 
Secumelcaror to Fice., > 
SGNNEG! ZERG<® : <> VECZERC: (Send the zero vectcer 
when triggered by output 
Boom 2ene 72 
SEN Common) ibis oO >URE ZERO: 
eer fr trot =P: SYNC C2): CEnsures <3>CP_MOVE is 
set to zero before 
<1>CP MOVE is provided 
with signal to fire 
accumulator. ?} 
Sane 2ZeERG<1>:<1>ZERG PIRS®E- 
EOUNBET VEEZERO<1>:<e>ZER@ FIRST: 
CONEel ZER@ PITRSI<l>:<S>EP MOVE. 
See @le2zerO FIPRST<e>. <1 ,EP MevE- 
mer esl Ze we >= CONSTANT - CAFter CP_MOVE fires, 
resets CP _MQVE Firing 
increment. } 
SOMieel oer MOWUE<1>:<1>STEP SIZE; 


SeNeae.O00S Tt Cex Sole PeolZe. 
GMP Gt STEP SIZE<1> -<2a>CP MOVE: 
sel thekwewe--=F > CONSTANT ; {Sends new value of 


Piaieetetro PIGKEDe, after 
any remnant in the 
CP MOVE accumulator has 
been dumped to the host 
FoOReaedition to the 
position of the 
previously picked 
vertex.} 

Ge veelerilEKED<1>+<e>SET PIEKEDe- 

Pmieep STEP SIZE<1>:<1>SET. PICKEDe: 
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PICKEDE or: NGP ; (COmeerms 2t2dentifier of 
Currently selected 
vertex, but is not 
updated until CP MOVE 
accumulator remnant has 
been reported in 
accordance with previous 
value Of PICKEDEe. ? 

GONNEGH Sele rlrexeie<l>=<1>FICKEDe: 

SONiINeGee rr eke we<)>:<1>SWITCH PleK; 
{See SWITCH PICK near 
end of Vertex Picking 
Network. } 

CONNECT PICKEDe<1>:<2>MOQVE THIS ONE; 
€See MOVE SYNC above. } 

Sear lXtl) Shee <lorickese. 

{ 


We We Me Me ie Me ie ME NE Ae ie Se AE Ne ie Ae Ne ee Ee Ee GE Ne Ae ee EE Ae ie EE Ae ee AE ie Ee Ee EE Ee EE ee Ee le at 
Me We Me Ae Ae Ne Ae NE NE HE HE EE HE NE RE ote NE NE ie ie AE Ue NE Re NE ee NE NE UE UE EE Ee Ee NE ie EE ee ee EE Ee ee ie ie EE 
We Me Me We ME Me ME ie HE ie AE UE Ae UE Ee Ee EE EE ale ie EE Ee Ee ee Ee EE ee EE ie Ee Ee ee 


ie ie He Ge ie Ae ee NE NE EE A NE AE EE Ne ie EE AE ee ee Ee EE ee EE Ee ee Ee Ee 


3 
emt eroe mr. INPUTS CHOUSECS); toenG. a FALSE. af clip= 
Bieg as Gff, TRUEeIF 
Seung 1S Om.7 
SEM FALSE TG Sel iP Rue : 
Sewer Rue to a7 bole ee RuUe - 
GONNECT FETCHCLIPN@BE<1>:<a>CLIP TRUE; 
SONNE GieGl POTRUECI><<I>ELIPON.€bmable clipping.3 
meet WilerP TRUE<I>:<1>CLIP_ INIENSI TY. 
€CDisable depth cueing? 
Be UlAL =F > CROUTECe): CRoutes signal from dial 
SReereowcee. Clipping 
PaiiGwowtnemele Clipping 


enabled.?} 
BONNBG lh eSB TENCE i PMBBES i> <P> ELIP DIAL; 
CONNECT DIALS<6>:<2>CLIP_DIAL; 


GeMNeEer CLIP BDIAL<1>:<1>0ISEARE: 
€Discard signal from 
ols ells pia pedtaijela)lglsim alone 
enabled.+3 

Bete Jou t=F 2 ACCUMULATE; CAccumulate dial signal? 

BONNBeteCLIPF DIAL<e>:<1i>CLIP IGIAL; 
CRoutes signal from dial 
EQmaececlUmulater only if 
Seaoatmg 1S Om CECLIFMODE 


ee 
Sen O..5 TO <2>CLIP_ TOTAL; €Reset value. ?} 
Senligao wt TO <4>CLIP_TOTAL; €Scale dial signal and 


convert to real number.} 





Savor 


TO <S>CLIP_TOTAL: 


SEND 0.002 TO <6>CLIP TOTAL: 
CLIP_SYNC:=F:SYNC(C2): 


ee 


C(Haximem clipping width? 
(i haemunee roping width? 
CEnstres clipping window 
limit is reset before 
the new window matrix is 
Sepiemee GlLIPEER, ? 


CONNECT CLIP TOTAL<1>:<1>CLIP SYNC; 
CONNECT CLIP TOTAL<1>:<2>CLIP SYNC; 
WINDOW MATRIX: =F: WINDOW; 


See 
SNe 
SENDy= 1 
SEND 1 
SEN. O 
CENNECT 


CONNECT 


ee 


<2>WINDOW MATRIX; 
<3>WINDOW MATRIX; 
<4>WINDOW MATRIX; 
<S>WINDOW MATRIX; 
<G6>WINDOW MATRIX; 


(Provides a new matrix 
defining the windcw with 
the new clipping width.?} 
Clamadow x minimum. 2? 
{Window * maximum. 3} 
{Window Y minimum. } 
{Window Y maximum. ?} 
Garomo ¢c-eClipping. Slane? 


CLIP SYNC<1>:<7>WINDOW MATRIX: 


€(Back 2-clipping plane 
defined by dial signal} 


Gel Pes wit<e> aor NpOW MATRIX: 


{Trigger WINDOW MATRIX 
to send new matrix.3} 


Sede eewINDGW MATRIX<1>:<2t>ELIPPER; 


c 


We We We We We We Me He Me He AE He HE HE he HE HE HE HE te HE HE EE AE ME HE ME HE HE HE EE EE HE AE HE EE EE Ee EE EE EE Ee ee EE 


We He He HE HE Ee Ae te HE HE NE Ee AE HE OE HE HE HE Ee He Ee Ee HE AE Ee HE HE ee Ee HE Ee Ee EE Ee Ee ik HE EE EEE EE 


We Me ME Me He HE He Me HE ME ME HE HE EE EE EE HE HE ME HE HE HE Ee ee HE HE AE EE HE HE HE EEE ME ME Ee NE EE EE EE 


+ 


me OPS. “=F -Aboc; 


{Add offset to Function 
key signals to put them 
Viteurange which host 
computer program 
recognizes as indicating 
a pressed Function key} 


Siewert ACSOOI0TO <e>nby OFFSET; 
Sehr) wwe Ysst>:<i>key OFFSET ; 
GONE e tl REY OFFSET<t>]<1>TO_ HOST; 
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ee eee ee oe ine PUnGcion Keys and Dials ******x*xxe 


2 
Rey 1: 


Rec - 


KEY3: 


Remy t': 


<> 
KEYS: 


OF 
KEYE: 


Soviets CK AOOSECS 2 - 


SENG UST ICES 10 <1>kKey1; 
SE NEM TCES* 10 -<e2>KEy1 ; 
SENGREVeRniCkES TO <a7Key1.; 
SENDP wer eVERT TO <2>Ke- 
ECNNES Te we re nnobe< l> <S2Key 1; 


GONNSE TREY 1<1>;<1>FLABELI :; 


=F: INPUTS CHOOSECS): 
SEND °B-SPLINE’ TO <1>KEyYe2; 
SEND ’B-SPLINE’ TO <2>KEY2: 
SEND ’°B-SPLINE’ TO <3>KEYe; 
SEND ’ ° TO <4>KEYe2; 

CONNECT FETCHMODE<1>:<S>KEYe2: 
CONNECT KEY2<1>:<1>FLABEL2: 
=F: INPUTS CHOOSECS); 

SEND ’KNOWN PT’ TO <1>KEY3:; 
SEND *KNOWN PT’ TO <2>KEY3; 
SEND ’KNOWN PT’ TO <3>KEY3; 
SEND ’ ° TO <4>KEY3; 

CONNECT FETCHMODE<1>:<S>KEY3; 
CONNECT KEY3<1>:<1>FLABEL3; 
=F: INPUTS CHOOSECS); 

SEND ’INTERACT’ TO <1>KEY+4; 
SEND ’ ° TO <2>KEY4; 

SEND °’INTERACT’ TO <3>KEY4; 
SEND ’PLT SCRN’ TO <4>KEY4; 
CONNECT FETCHMODE<1>:<S>KEY4; 
CONNECT KEY4<1>:<1>FLABEL4:; 


=F: INPUTS CHOOSECS); 

SEND ’CLIP’ TO <1>KEYS; 

SEND °CLIP’ TO <2>KEYS: 

SEND ’CLIP’ TO <3>KEYS; 

SEND ’ ° TO <4>KEYS; 

CONNECT FETCHMODE<1>:<S>KEYS: 
CONNECT KEYS<1>:<1>FLABELS; 


=F: INPUTS CHOOSECS); 
SEND ’REFLECT’ TIO <1>KEY6; 
SEND ’REFLECT’ TO <2>KEY6; 
SEND ’ ’ TO <3>KEYS; 

SEND ’ ° TO <4>KEYG: 

CONNECT FETCHMODE<1>:<S>KEYS; 
CONNECT KEYS<1>:<1>FLABELS;: 


{Stores labels for 
Phe y 13 


CNieitmeeles hey |) OF which 
label to use, depending 
on mode. 3} 


{Sends label to 
keyboard. ? 





Pes 


oe 
REY / SEEPS CHOOSECS): 
See hyve TO °<1>KEY7,; 
Sane Ke 10 <e>KEY7 ; 
Meee bes =F INPUTS CXHGGSECS3). 
SSD pier rew “Taiecie>KEY7 MODES; 
cs Teme REY7 MODES; 
Se Uieet PE TECHPPCKMOBESI> :<s>KEY?7 MODES; 
KEY? coy NG seh svYNGtCec);tEnsures mew PICKMODE 


value is in place oan 
KEY? MODES before new 
MODE value is sent to 
KEY? Geiggecing that 
Eine @ Olin 2 
CoVNE Et See eiOUES< 1> >< 1>KEY7 SYNC; 
CaiNee tam ennOUE<l>:<2>KEY7 SYNE: 
COnNBE RO KEY 7 eSyNE<1>:<3>KEY7; 
SseNae  ~— TO ee 
CUP e teen eY / SYNE<2>:<S>KEY7: 
CONNECT KEY7<1>:<1>FLABEL7; 
ao 
Meo eee lS CHOOSECS):- 
Seem x2. TG <1>KEYS; 
Sen AZ 10 <e>KEYSG; 
hE ee peges.- INPUTS CHOGSECS). 
SENaS” TOR eye MOUES; 
Seiiee fr liCk Pre Teec2>KeYa MODES; 
CONDE el FPETERPICKNBBE<1> :<S>KEYS MODES; 
NEYS ome wer oy NEGe >. 
GONE Gee veeNOBES<1>-:<1>KEYS SYNC. 
CONN Ee eee tinOUE<1>:<2>KEYS SYNC; 
SOUNPEE KEYG SYNG<1>:<S>KEYG: 
SEND ’SAVU VERT’ TOTS Ey S. 
CONNECT SReYS SYNE<e>:<S>KEYG; 
BORNE ET SKBYS< 1>:<1>FPLABELB; 
c 
Meo mee NPS CHOOSECS) ; 
Sen YZ° TO <1>KEYS; 
SEN ¥2° TO <e>KEYS; 
Saye TQ <S3>KEYS; 
SEP SEP UERT. TO <4>KEYS: 
Miwoer re  CHBBE<1> YS KEYS: 
CONNECT KEYS<1>:<1>FLABELS; 
eS 
Peon otNruts CHOOSE CS) ; 
Sew Lei <1 >REY1O; 
See ee te <em> REY 10; 
Se ew PE << 3S>KEY 1O:: 
Sah eee Gl < +> kiny TO. 
CONE Giese CHMODE< 1>-<S>KEY1O- 
PANNE eee LOC >< 1l>FLABELIO- 





Lae 


eye fo SbeNeuTS CHOOSECS):: 


ct 


Sete se ) 9 bOecLekEY 11. 

SEniee eeor f” TO e>KEY 11. 

See ReoeT” [eacs> KEY II. 

SENG wees lO <“S>OKEYI TL: 

Seve et eae heniGwe<1>-<SeKEY11; 
BOMNEGT VREY1I<1>.<1>FLABELI) ; 


eon Neots eHOOSECS) . 


ee 


SEN TO <1>KEYde= 

SE eeu Sle <e>KEY le: 

See ewiat 10 <a>KEYle:; 

Sey Eee l7O” TO <4> KEY ie. 
CNPC Tee TeHMOUE< 1>:<S> KEY] -; 
GO HECTeheyte<i>:<1>FLABEETe: 


EPO Spe PUTS EHOOSECS): 


eo 


SEB GLOBAL x’ TO <1>0RAL1; 
Sei GeEesaql ~° 10 <e>BIAll; 
SEN VERTEX xX 10 <3>DIaLl1,; 
Sere” — f0 <4>0I1ALl; 

Ceiee ) see lt CHMODE< 1>:<S>8I1ali; 
GENHEeCYT OLALI<1><<1>OUCABELT; 


Sabe ae PUTS CHOOSECS) 


oe 


Sewe Global Y* TO <i> late: 
SENEMeseO@bAl Y° T6 <2>UIALE; 
SENEDR VERTEX Y°- 10 <3>Ulale; 
SE Fat <s>DIALe; 

SONNEET “FETEHNIODE<1>:<S>UTALe; 
meee’ Dlale<i>:<t>ULABELe; 


meee were TNPUTS CHOOSECS) ; 


2 


SEMm@e GLOBAL 2 10 <1>BIALS, 
See GlOeBAL 2° TO) <e>D1lALa; 
Seii@e VERTEX 2 10 <3>DIAL3; 
sen” " TO <S>DIALla: 

Se NNEeT PEtEHMNODE<1>-<S>UlIAL3; 
GERPREGA DIALS<1>:<1>DLABEL 3; 


BeEINKER@@r > INRGTS CHOOSECS):; {Cause translation dials 
EO csee nk when in inter- 
active mode.?} 


SENOSEOLSE 10 <1> BETNRER ; 
SENUSPFAESE [0 <e> BETTER. 
SENESIEVE | 10 <3> BETMRER; 
SENDS FALSE IC <a BEVIKER: 


Se heer Pe enNOwe< > -<S> ee MER; 
CShNEE? BE INKER< i> :<2>ULGBEEL- 
GONNEGT BLINKER< 1>:<e>0LABELe; 
GONNGEGT BUINKER<1>:><e2>DLABEL3; 





io 


ee 

eget ERPS CHOOSECS); 
sone SeRLING® 10 <1>BIALcd; 
Shi Seal tNG 10 <e7slakt; 
Sec oenl ING’ TG) <S>D1AL4 ; 
See oan 10 <t> DIAL: 
Gere el me renmMODE< I> <S> BTS. 


CONNECT DIAL4<1>:<1>DLABEL4; 
C3 
DIALS: =F: INPUTS CHOOSECS); 
SEND ’ROTATE X’ TO <1>DIALS; 
SEND ’ROTATE X’ TO <2>DIALS; 
SEND ’ROTATE X’ TO <3>DIALS; 
SEND ’ ’ TO <4>DIALS; 
CONNECT FETCHMODE<1>:<S>DIALS; 
CONNECT DIALS<1>:<1>DLABELS: 
3 
DIALS: =F: INPUTS CHOOSECS); 
SEND ’ROTATE Y’ TO <1>DIALS; 
SEND ’ROTATE Y’ TO <2>DIALS; 
SEND ’ROTATE Y’ TO <3>DIALS; 
SEND ’ ’ TO <4>DIALS; 
CONNECT FETCHMODE<1>:<S>DIALE6; 
CONNECT DIALS<1>:<1>DLABELS: 
C3 
DIAL7: =F: INPUTS CHOOSECS); 
SEND °ROTATE Z’ TO <1>DIAL7; 
SEND ’ROTATE 2’ TO <2>DIAL7: 
SEND ’ROTATE 2’ TO <3>DIAL7: 
SEND *’ ’° TO <4>DIAL7; 
CONNECT FETCHMODE<1>:<S>DIAL7:; 
CONNECT DIAL7<1>:<1>DLABEL7; 


eo 
meaeo Pe INPUTS CHOOSECS): 
Sehiey 9 TO <1>DIALB; 
sei “ELIPPING’ TO <e>DIAL&; 
CONNEC) FETEHEL I IPMODE< > :<3S>BI1ALS- 
CONNEET DIlALS< 1>:<1l>BLABELS: 
G3: 
sere! TO <1>NEW MODE; {ilrigger initial sending 


GReceratl =: Operating 
mode indicators. 
Whenever an operating 
mode indicator 
Cvariable) changes, the 
host computer will send 
a similar triggering 
message. 





SRRENBIX 


LINX COMMAND FILE 


The Following is the command file used to link 
SoCINE FINS wieh the various host-rcresident FS 300 library 
subroutines. 


SPeINbyaewee / it) *soline, oa 
Cle Lives 7 LB 

ES 2OOuSRSNEW7 LB 

LIBRE reS: kG 

ACTFILs4 

UNT 1S 

ASG=rits : 7 

ASG=57O:6 

PR E=SO 

To 
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